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The problem with most real-lime operating systems is 
simple, they're not an integrated solution. You end up dealing 
with a multitude of suppliers for languages, compilers, debug- 
gers and other important development tools. And when 
something does go wrong, it can be a frustrating experience 
trying to straighten out the mess. 

Why Not Try the 
Microware One-Stop 
Total Solution? 

Microware's OS-9 Real-Time 
Operating System is a total inte- 
grated software system, not just 
a kernel. \Afe offer an extensive 
set of development tools, lan- 
guages, I/O and Kernel options. 
And this total integrated solution 
is entirely designed, built and 
supported by the same expert 
Microware team. 
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MMU (Security Pioloclion) Support 


J-. 5-. A-inch Diskettes 
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Modularity Lets YOU Choose fust What You Need. 

The modular design of OS-9 allows our Operating System 
to adapt as your requirements change. OS-9 can support a 
complete spectrum of applications — from embedded ROM- 
based code in board-level products all the way up to large 
scale systems. 

Support is Part 
of the Package. 

Microware is proudly setting 
the industry's standard for cus- 
tomer support. \bu'll find pro- 
fessional and comprehensive 
technical documentation and a 
Customer Hotline staffed by 
courteous and authoritative soft- 
ware engineers. 

So stop messing with sim- 
ple kernels and independent 
suppliers. Call Microware today 
and find out more about the 
"One-Stop Integrated Solution" 
with OS-9! 
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INTRODUCTION 

This chapter begins with a statement by Nicholas Winn about 
his new language, Obcron. It ihcn discusses the problems of 
linking C, Fortian, and Pascal functions together in order to 
form an executable program. 

FROM MODULA TO OBERON 

The following discussion was taken almost verbatim from a 
statement by Nicholas Winn concerning his new piogramming 
language, which he calls Obcron. For those unfamiliar with 
Wirth, he is credited with the initial design of Pascal and of its 
successors Modula and Modula-2. 

It is included here because it illustrates the fact that successors 
of the Pascal language arc becoming much more like the C 
language than are later revisions of the C language becoming 
more like Pascal or Modula. 

The programming language Obcron is the result of a concen- 
trated effort to increase the power of Modula-2 and simultane- 
ously to reduce its complexity. Several features were elimi- 
nated, and a few were added in order to increase the expressive 
power and flexibility of the language. This paper describes and 
motivates the changes. The language is defined in a concise 
report. 

Ihe progiamming language Obcron evolved from a project 
whose goal was the design of a modem, flexible and efficient 
operating system for a single-user workstation. A principal 
guideline was to concentrate on properties that arc genuinely 
essential and, as a consequence, to omit ephemeral issues. It is 
the best way to keep a system in hand, to make it understand- 
able, explicable, reliable and efficiently implementable. 

Initially, it was planned to express the system in Modula-2 (1], 
as that language supports the notion of modular design quite 
effectively, and because an operating system has to be designed 
in terms of separately compilable parts with conscientiously 
chosen interfaces. In fact, an operating system should be no 
more than a set of basic modules, and the design of an applica- 
tion must be considered as a goal-oriented extension of that 
basic set Programming is always extending a given system. 



Whereas modem languages, such as Modula. support the notion 
of extensibility in the procedural realm, the notion is less well 
established in the domain of data types. Modula in particular 
decs not allow the definition of new data types as extensions of 
other, programmer-defined types in an adequate manner. An 
additional feature was called for, thereby giving rise to an 
extension of Modula. 

The concept of the planned operating system also called for a 
highly dynamic, centralized storage management relying on the 
technique of garbage collection. Although Modula docs not 
prevent the incorporation of a garbage collector in principle, iis 
variant record feature constitutes a genuine obstacle. As the new 
facility for extending types would make the variant record 
feature superfluous, the removal of this stumbling block was a 
logical decision. This step, however gave rise to a restriction 
(subset) of Modula. 

It soon became clear that the rule to concentrate on the essential 
and to eliminate inessential should not only be applied to the 
design of the new system, but equally stringently to the lan- 
guage in which the system is formulated. The application of the 
principle thus led fiom Modula to a new language. The adjec- 
tive new, however, has to be understood in proper context. 
Obcron evolved from Modula by very few additions and several 
subtractions. 

In relying on evolution rather than revolution we remain in the 
tradition of a long development that led from Algol to Pascal, 
then to Modula-2, and eventually to Obcron. The common trait 
of these languages are their procedural rather than functional 
model, and the strict typing of data. More fundamental even is 
perhaps the idea of abstraction: the language must be defined in 
terms of mathematical, abstract concepts without reference to 
any computing mechanism. Only if a language satisfies this 
criterion can it be called "higher-level". No syntactic coasting 
whatsoever can cam a language this atttibutc alone. 

The definition of a language must be coherent and concise, litis 
can only be achieved by a careful choice of the underlying 
abstractions an appropriate structure combining them. The 
language manual must be reasonably short, avoiding the 
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explanation or individual cases derivable from the general rules. 
The power of a fotmalism must not be measured by the length 
of ils description. To the contrary, an overly lenglhy definition 
is a sure symptom of inadequacy. In this respect, not complexity 
but simplicity must be the goal. 

In spite of its brevity, a description must be complete. Com- 
pleteness is to be achieved within the framework of the chosen 
abstractions. Limitations imposed by particular implementations 
do not belong to a language definition proper. Examples of such 
restrictions are the maximum values of numbers, rounding and 
truncation errors in arithmetic, and actions taken when a 
program violates the stated rules. It should not be necessaiy to 
supplement a language definition with voluminous standards 
document to cover "unforeseen" cases. 

But neither should a programming language be a mathematical 
theory only. It must be practical tool. This imposes certain 
limits on the terseness of the formalism. Several features of 
Oberon are superfluous from a purely theoretical point of view. 
They are nevertheless retained for practical reasons, either for 
programmers' convenience or to allow for eflicicnt code 
generation without the necessity of complex, "oplimizing" 
pattern matching algorithms in compilers. Examples of such 
features are the presence of several foims of repetitive state- 
ments, and of standard procedures such as INC. DEC, and 
ODD. They complicate neither the language conceptually nor 
the compiler to any significant degree. 

These underlying premises must be kept in mind when compar- 
ing Oberon with other languages. Neither the language nor its 
defining document reach the ideal; but Oberon approximates 
these goals much better than its predecessors. 

A compiler for Oberon bas bten implemented for the NS 32000 
processor family and is embedded in the Oberon operating 
environment. The following data provide an estimate of the 
simplicity and efficiency of the implementation, and readers arc 
encouraged to compare them with implementations of other lan- 
guages. Measurements were made on a 10 MHz NS32032. 



area 


lines 


chars 


bytes 


seconds 


Parser 


1116 


3671 


99928 


11.53 


Scanner 


346 


9863 


3388 


3.80 


Import/Export 


514 


18386 


4668 


5.25 


Code generator 


19636 


5901 


21636 


21.02 


Total 


3939 


130869 


39620 


41.60 



In the following is presented a brief introduction to Oberon 
assuming familiarity with Modula (or Pascal), concentrating on 
the added features and listing the eliminated ones. In order to be 
able to "start with a clean table", the latter are taken first. 

Variant records are eliminated, because they constitute a 
genuine difficulty for the implementation of a reliable storage 
management system based on automatic garbage collection. The 



functionality of variant records is preserved by the introduction 
of extensible data types. 

Opaque types cater to the concept of the abstract data type and 
information hiding. They arc eliminated because again the 
concept is covered by the new facility of extended record types. 

Enumeration types appear to be a simple enough feature to be 
uncontroversial. However, they defy extensibility over module 
boundaries. Either a facility to extend enumeration types would 
have to be introduced, or they would have to be dropped . A 
reason in favor of the latter, radical solution was the observation 
that in a gi owing number of programs the indiscriminate use of 
enumerations had led to a pompous style that contributed not to 
program clarity, but rather to verbosity. In connection with 
import and export, enumerations gave rise to the exceptional 
rule that import of a type identifier also causes the (automatic) 
import of all associated constant identifiers. This exceptional 
rule defies conceptual simplicity and causes unpleasant prob- 
lems for the implementor. 

Subrange types were introduced in Pascal (and adopted in 
Modula) for two reasons: (1) to indicate that a variable accepts a 
limited range of values of the base type and allow a compiler to 
generate appropriate guards for assignments, and (2) to allow a 
compiler to allocate the minimal storage space needed to store 
values of the indicated subrange. This appeared desirable in 
connection with packed records. Very few implementations 
have taken advantage of this space saving facility, because 
additional compiler complexity is very considerable. Reason 1 
alone, however, did not appear to provide sufficient justification 
to retain the subrange facility in Oberon. 

With the absence of enumeration and subrange types, the 
general possibility to define set types based on given element 
types appeared as redundant. Instead, a single, basic type SET is 
introduced, whose values ate sets of integers from to an 
implementation defined maximum. 

The basic type CARDINAL had been introduced in Modula-2 
in order to allow address arithmetic with values from to 2 A 16 
on 16-bit computeis. With the prevalence of 32-bit addresses in 
modem processors , the need for unsigned arithmetic has 
practically vanished, and therefore me type CARDINAL has 
been eliminated. With it, the bothersome incompatibilities of 
operands of types CARDINAL and INTEGER have disap- 
peared. 

The notion of a definable index type of arrays has also been 
abandoned. All indicies aie by default integers. Furthermore, 
the lower bound is fixed to 0; array declarations specify a 
number of elements (length) rather than a pair of bounds. This 
break with a long standing tradition since Algol 60 demon- 
strates the principle of eliminating the inessential most clearly. 
The specification of an arbitrary lower bound provides no 
expressive power at all, but it introduces a non- negligible 
amount of hidden, computational effort. Only in the case of 
static declarations can it be delegated to the compiler. 
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Experience with Modula over the last eight years has shown 
that local modules wcie rarely used. The additional complexity 
of the compiler required to handle them, and the additional 
complications in the visibility rules of the language definition 
appear not to justify local modules. 

Ihe qualification of an imported object's identifier x by the 
exporting module's name M, viz. M.x can be circumvented in 
Modula by the use of the import clause FROM M IMPORT x. 
This facility has also been discarded. Experience in program- 
ming systems involving many modules has taught that ihc 
explicit qualification of each occurrence of x is actually 
preferable. A simplification of ihe compiler is a welcome side- 
effect. 

The dual role of the main module in Modula is conceptually 
confusing. It constitutes a module in the sense of a package of 
data and procedures enclosed by a scope of visibility, and at the 
same time it constitutes a single proccduie called ihc main pro- 
gram. Within the Obcron system, the notion of a main program 
has vanished. Instead, the system allows the user 10 activate any 
(exported, paramcterlcss) procedure (called a command). 
Hence, the language excludes modules wiihout explicit defini- 
tion paits, and every module is defined in leims of a definition 
part and an implementation part (not definition module and 
implementation module). 

The with statement has been discarded. Like in the case of 
exported identifiers, the explicit qualification of field identifiers 
is to be piefcrred. 

The elimination of the for statement constitutes a break with 
another long standing tradition. The baroque mechanism in 
Algol 60's for statement had been trimmed considerably in 
Pascal (and Modula). Its marginal value in piaclice has led to iis 
absence in Obcron. 

Modula-2 makes access to machine-specific facilities possible 
through low-level constructs, such as the data types ADDRESS 
and WORD, absolute addressing of variables, and type casting 
functions. Most of them are packaged in a module called 
SYSTEM. The features were supposed to raiely used and easily 
visible trough the presence of SYSTEM in a module's import 
list. Expeiience has revealed, however, that a significant 
number of programmers import this module quite indiscrimi- 
nately. A particulary seducing trap are Modula's type transfer 
functions. 

It appears preferable to drop the pietcnse of portability of 
programs that import a "standard", yet system-specific module. 
Both the module SYS1EM and the type transfer functions are 
eliminated, and with them also the types ADDRESS and 
WORD. Individual implcmcntors are free to provide system- 
dependent modules, but they do not belong to the general 
language definition. Their use then declares a program to be 
patently implementation-specific, and thereby non-portable. 



The system Obcron dees not require any language facilities for 
expressing concurrent processes. Ihc pertinent, rudimentaiy 
features of Modula, in particular the coroutine, were therefore 
not retained. This exclusion is merely a reflection of our actual 
needs within the concrete project, but not on the general 
relevance of concurrency in programming. 

Ihc most important extension to Modula is the facility of 
extended record types. It permits the consti uction of new types 
on the basis of existing types, and establishing a certain degree 
of compatibility between the names of the new and old types. 
Assuming a given type 



T - RECORD X, y: INTEGER END; 



extensions may be defined which contain certain Fields in 
addition to the existing ones. For example 



TO - RECORD (T) z: REAL END; 

Tl - RECORD <T) w: LONGREAL END; 



define types with fields x, y, z and x, y, w respectively. We 
define a type declared by 



RECORD <T> <field definitions> END; 



to be a (direct) extension of T, and conversely T to be the 
(direct) base type of T\ Extended types may be extended again, 
giving rise to the following definitions: 

A type T' is an extension of T, if V - T or T' is a direct 
extension of an extension of T. Conversely, T is a base of T, if 
T = T orTts the direct base type of abase type of T". We 
denote this relationship by T* => T. 

Ihc rule of assignment compatibility states that values of an 
extended type are assignable to variables of their base types. For 
example, a record of type TO can be assigned to a variable of 
the base type T. This assignment involves the fields x and y 
only, and in fact constitutes a projection of the value onto the 
space spanned by the base type. 

It is important that an extended type may be declared in a 
module that imports the base type. In fact, this is probably the 
normal case. 

This concept of extensible data type gains importance when 
extended to pointers. It is appropriate to say that a pointer type 
P* bound 10 T extends a pointer type P, if P is bound to a base 
type T of T\ and to extend the assignment rule to cover this 



March 4 89 



68 Micro Journal 



case. It is now possible to form structures whose nodes are of 
different types, i.e. inhomogenious data stiuctuies. The inhomo- 
geneity is automatically (and most sensibly) bounded by the fact 
that the nodes are linked by pointers of a common base type. 

Typically, the pointer fields establishing the structure are 
contained in the base type T, and the proceduics manipulating 
the structure are defined in the same (base) module as T. 
Individual extensions (variants) are defined in client modules 
together with procedures operating on nodes of the extended 
type. This scheme is in full accordance with the notion of 
system extensibility: new modules defining new extensions may 
be added to a system without requiring a change of the base 
modules, not even their recompilation. 

As access to an individual node via a pointer bound to a base 
type provides a projected view of the node data only, a facility 
to widen the view is necessary. It depends on the possibility to 
determine the actual type of the referenced node. 

This is achieved by a type test, a Boolean expression of the 
form 



to pointers, thereby intertwining the concept of access method 
and data type in an undesirable way. Here, the relationship 
between a type an its extensions is based on the established 
mathematical concept of projection. 

In Modula, it is possible to declare a pointer type within an 
implementation module, and to export it as an opaque type by 
listing the same identifier in the corresponding definition 
module. The net effect is that the type is exported whereby its 
associated binding remains hidden (invisible to clients). In 
Oberon, this facility is generalized in the following way: Let a 
record type be defined in a certain implementation part, for 
example: 



Viewer = RECORD width, height: INTEGER; x, y: INTEGER END: 



In the corresponding definition part, a partial definition of the 
same type may be specified, for example 



Viewer - PECCBD width, height: INTEC2fl END; 



t IS T' or <p IS P') 



If the test is affirmative, an assignment t' :» t (t' of type T') or 
P' : = P (P* of type p ") should be possible. The static view of 
types, however, prohibits this. Note that both assignments 
violate the rule of assignment compatibility. 

The desired statement is made possible by providing a type 
guard of the form 



with the effect that a partial view (a public projection) is visible 
to clients, In client modules as well as in the implementation 
part it is possible to define extensions of the base type (e.g. 
TextViewers or GraphVieweis). 

Modem processors feature arithmetic operations on several 
number formats. It is desiiable to have all these formats 
reflecled in the language as basic types. 



t(T) or <p' 



P<P)) 



Oberon features five of them: 



and by the same token access to the field z of a TO (see previous 
examples) is made possible by a type guard in the designator 
t(T0).z. Heie the guard asserts that t is (currently) of type It). 

The declaration of extended record types, the type test, and the 
type guard are the only additional features introduced in this 
context. A more extensive discussion is provided in [2]. The 
concept is very similar to the class notion of Simula 67 [3], 
Smalltalk [4], and others. Differences lie in the fact that the 
class facility stipulates that all procedures applicable to objects 
of the class are defined together with the data declaration. It is 
awkward to be obliged to define a new class solely because a 
method (procedure) has been added or changed. 

In Obaon, procedure (method) types rather than methods are 
connected with objects in the piogram text. The binding of 
actual methods (specific procedures) to objects (instances) is 
delayed until thepiogiam is executed. In Smalltalk, the com- 
patibility rules between a class and its subclasses are confined 



LONGINT, INTEGER, SHORTINT (integer types) 



LONGREAL, REAL (real types) 



With the proliferation of basic types, a relaxation of compatibil- 
ity rules between them becomes almost mandatory. Note that in 
Modula the arithmetic types INTEGER, CARDINAL and 
REAL are uncompaiible. To this end, the notion of type 
inclusion is introduced: a type T includes a type T'. if the values 
of T' are also values of type T. 

Obaon postulates the following hierarchy: 



LONGREAL > REAL > LONGINT > INTEGER > SHORTTNT 



60 Micro Journal 



March '89 



The assignmeni rule is relaxed accordingly: A value of type T 
can be assigned to a variable of type T, if T' is included in T (if 
V extends T), i.e. if T > T* or T => T. In this respect, we 
return to (and extend) the flexibility of Algol 60. 



For example, given variables 

i: INTEGER,' ki LONGINT; x: REAL 



3. G. Birtwistle, etal. Simula Begin. Auervach, 1973. 

4. A. Goldberg, D. Robson. Smalltalk-80: The language and its 
implementation. Addison- Wesley, 1983. 

5. N. Wirth. The Programm ing language Oberon 



MULTI-LANGUAGE LINKAGE 



the assignments 



k;-i; x:-k; x:-l; k:-k+l; x:-x*JO+i; 



are confinning to die lules, where the assignments 



This discussion of multi-language linking was edited from a 
Usenet comment by Chris Torek at the University of Maryland 
Computer Science Department. Although the discussion is 
oriented toward unix, similar considerations would apply under 
other operating systems. 

How can you link C. Fortran, and Pascal programs together 
under unix? 



i:-k; k:-x; 

are not acceptable. Finally, it is worth noting that the various 
arithmetic types represent a limited set of subrange types. 

The multidimensional open array and the closure statement (in 
symmetry to a module's initialization body) arc the remaining 
facilities of Oberon not present in Modula. 

The language Oberon has evolved fiom Modula-2 and incorpo- 
rates the experiences of many years of programming in Modula. 
A significant number of features have been eliminated. They 
appear to have contributed more to language and compiler com- 
plexity than to genuine power and flexibility of expression. A 
small number of features have been added, the most significant 
one being die concept of type extension. 

The evolution of a new language that is smaller, yet more 
powerful, than its ancestor is contrary to common practices and 
trends, but has inestimable advantages. Apart from simpler 
compilers, it results in a concise definition document [5], and 
indispensible prerequisite for any tool thai must serve in the 
construction of sophisticated and reliable systems. 

It is impossible to explicitly acknowledge all contributions of 
ideas that ultimately simmered down to what is now Oberon. 
Most came from lite use or study of existing languages, such as 
Modula-2, Ada, Smalltalk, C-*-+ and Cedar, which often though 
us how not to do it Of particular value was the contribution of 
Oberon 's first user, J. Gutknechi. The author is grateful for his 
insistence on the elimination of deadwood and on basing the 
remaining features on a sound mathematical foundation. 

1. N. Wiiih. Programming in Modula-2. Springer-Verlag, 1982. 

2. N. Wirth. Type Extensions. ACM Transactions on Program- 
ming Languages and Systems 1988 



First, there is the mailer of names: The symbols in the object 
files must match, so that the linker may resolve the right 
references. Each compiler has its own methods for mapping 
from source to object Within one language we may usually 
ignore this mapping; but when mixing languages, it becomes 
important, as will be seen below. 

The C compiler lakes any global symbol and prepends an 
underscore character, '_'. Names are not limited in length; 
although in fact there is a limit of about a thousand characters, 
no one seems to be bothered by il. 

Thus, the following fragment of code: 



int global_var; 



char *somafunc() 
{ 



generates die symbols '_global_var' and \_somefunc'. 



The Fortran 77 compiler limits names to six characters, then 
prepends and appends an underscore. 

Thus, the following fragment of code: 



subroutine sub 
integer var 
comon Zoom/ var 
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names the subroutine '_sub_' and creates a global 'variable' 
containing one integer. The 'variable* is called '_com_'. 

Variables that are not part or a common block do not have 
global names. Fortran 77 docs not allow underscores in source- 
level names; 'subroutine sub_l' is illegal. 

The Foitran 77 compiler also ignoies any PROGRAM name, so 
that the following: 



Even with a compatible set of names, the task is not yet done. 
There remain two problems, each bound up with the other. 
Every program must have an entry point ('main'); and every 
language has its libraries. C's is the simplest of the three, for its 
main looks like every other C louline and needs no libraries not 
used by both Fortran 77 and Pascal as well. 

Fortran 77 's main is actually a C -compatible routine which 
initializes its I/O system, traps signals, and calls the program's 
MAIN function. 



program prog 

creates the symbol l MAIN ' 



The Berkeley Pascal compiler strings together the names of all 
nested procedures to concoct unique global names. Only 
variables denned in the 'program' part are global (no surprise 
here), and these names are constructed in the same way as C's 
globals. However, the program name is ignored, and the 
compiler uses the name *_piogram'. 



Thus, the following fragment of code: 



program foo; 


< 


symbol _program ) 


var v: 


integer ; 


( 


symbol _v ) 


procec 


lure proc; 


1 


symbol _proc } 


functi 


on func; 


( 


symbol _proc_func ) 


begin 








func : 


- 






end; 




{ 


end proc ' s func ) 


begin 








end; 




( 


end proc ) 


begin 








end. 




( 


end program ) 



Pascal's main is similar to Fortran 77's, but does not trap 
signals and calls .program, not _MAIN_. 

Both Fortran 77's and Pascal's mains also save argc and argv, 

Fortran 77's in _xargc and _xargv and Pascal's in argc and 

_argv. 

If you intend to call C routines from Fortran 77 or Pascal, and 
these routines are entirely self-contained, all that is necessary is 
to compile the C code to object, and mention the *.o' file in the 
linking command. Of course, you must also use the proper 
parameter passing conventions. 

Calling Fortran 77 or Pascal routines from C, however, is 
somewhat more difficult. If the routines perform no IAD, they 
may simply be compiled from souice to object and mentioned 
in the linking command. If they do I/O, you will need not only 
to initialize the I/O system, but also to clean up aftei ward. This 
becomes quite tricky and is best avoided whenever possible. 

Fortran 77's support library is written almost entirely in C. 
Fortran 77's I/O system is initialized by ihe C routine 'Unit' 
and terminated by the routine 'f_exit'. Both take no parameters. 

A Fortran 77 main program consists primarily of the following 
code: 

f_init{); 

MAIN_0 ; /* recall that C prepends an underscore */ 

f exitO; 



generates the symbols '.program'. *_v", '_proc', and 

'_proc_func'. It also generates the names ' proc_func' and 

' proc", but they shall be ignored for the moment. 

The Pascal compiler does not permit source-level names to 
contain '_'; thus, 'procedure proc_a' is illegal. 

It should be clear at this point that C programs can call any 
Fortran 77 or Pascal subroutines (procedures) or functions, and 
that Pascal can call many C routines, but not all, for names with 
underscores are not directyl accessible, while Fortran 77 
routines can call only specially-named C routines, namely those 
that end with an underscore, are less than seven other charac- 
ters, and contain no internal underscores. Fortran 77 and Pascal 
routines can never call each other directly. 



though there is much other code dealing with signals, and of 
course with argc and argv. 

Pascal's I/O system is initialized by the 'PCSTART' routine, 
written in C. 

Pascal's support library is also written in C. I find it amusing to 
note that other language libraries can be written in C, but C's 
language libraries cannot, for the most pan, be written in the 
other languages. 
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Pascal's main can be written in C as the following: 

extern int _argc; 
extern char **_argv; 

main (argc, argv) 
int argc; 
char **argv; 

t 



PCSTART (0) ; 
_argc - argc; 
_argv - argv; 
program (> ; 
PCEXIT(O); 

) 



although the compiler in fact generates this directly, eliminating 
an unnecessary return instruction. PCEXIT, unfortunately, 
terminates the program as well as flushing any pending output. 

As to the various libraries themselves, there are many, as 
follows: 



Library 


Used by 


-177 


Fortran 77 


-1177 


Fortran 77 


-1U77 


Fortran 77 


-lpc 


Pascal 


-lm 


Fortran 77, Pascal 


-1c 


C, Fortran 77. Pascal 



In other words, all the linking commands pass Mc* to the linker 
'Id': the others depend on the command. *f77' calls Id with all 
except '-lpc'; 'pc' calls Id with '-lpc -1m -lc'. 'cc' calls Id with 
only Mc', so to use an Fortran 77 routine with a C main, one 
must link with a command line similar to the following: 



cc main.o f77aub.o -lf77 -1177 -1077 -lm 



From the preceding discussion, you should now be able to 
compile and link mixed-language source files together into one 
executable module. 

However, (his is not the whole story, as there is still the impor- 
tant, difficult, and confusing issue of how parameters aie passed 
to functions in each of the languages. 

The Foiiran 77 compiler uses call by reference. The Pascal 
compiler uses call by value or call by reference, depending on 
the declaration of the called routine. I'htC compiler in variably 
uses call by value, but the language is powerful enough to simu- 
late other parameter mechanisms using only call by value by 
passing addresses and pointers. One ability which can be 
accomplished in Pascal, but not C or in Fort/an 77, is to pass 
arrays by value. This can be simulated in C using structures. 

For strict definitions of call by value, call by reference, call by 
name, and other parameter-passing techniques and issues, 
consult a good compiler book. 

Following are a few examples of mixed-language linking: 

[f77sub.f] 

SUBROUTINE SUB (A) 

IOTE£3R A 

DOUBLE PRECISION D 



C Mixed mode arithmetic is legal in Unix Fortran 77: 



D - A + 2.0 
CALL CSUB(D) 
RETURN 
END 



[psub.p] 

{ declare external C subroutine } 
procedure C3ub2(l: Integer); external; 

procedure psub(var i: integer); 
begin i ;- 3 end; 

function pruned: integer): integer; 
begin 

pfunc :« i + 2; 
csub(i) 

end; 



Moreover, the order of (he libraries specified is also important. 
'-I77' builds on '-U77*. and '-U77* builds on '-1U77'; all build 
on '-lm' and '-lc'. '-lpc' builds on Mm' and Mc'. Thus '-lpc' 
may be put anywhere with respect to '1177', for example: but 
both must appear before '-lm*. 



[cmain .c] 

main large, argv) 
int argc; 
char *»argv; 
( 

int i; 
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paubUl); /* call Pascal subroutine with var parameter •/ 
iub_Ui); /• call Fortran 77 subroutine: call by reference '/ 
1 - pfune(7); /• call Paacal function with value parameter •/ 
exit tO>; 



In ihe earlier example, these were ' proc* and 

' proc_func'. These routines do display winding for entry to 

_proc and _proc_func. The unwinding after procedure parame- 
ter calls is generated in-line. 



/• called from Fortran 77: call by reference «•/ 
e*ub_(d> double "d; { prlntf <>tg\n*, -d); | 



/• called from Paacal by value 
csubZID lnt 1; I prlntf <"*d\n" 



1); I 



Fortunately, function return values are all done the same way 
for simple-valued functions. Structure-valued functions should 
simply be avoided. 

Side-effects and the related issue of order of evaluation of 
arguments being evaluated for passing to functions present such 
difficult and implementation-dependent issues as to be avoided 
in all languages, at least for ihe purposes of this discussion. 

Since the above example dees no I/O in its Fortran 77 and 
Pascal routines, and in fact calls no Foruan 77 or Pascal 
intrinsics, this can be compiled with the following command 
lines: 



If you never use nested procedures, or nonlocal variables, you 
can safely ignore this. If you do, but do not know what a 
display is all about, again I will tell you only to consult a good 
compiler book. 

Look at the assembly code generated by your Pascal compiler 
for details on the display format Indeed, looking at the 
assembly code is a good way to determine just what the 
compiler is really doing for all three of these compilers. 



+++ 



m -c f77aub.f 

pc -c paub.p 

cc -c cmain.c 

cc -o example cnvain.o psub.o f77aub.o 



Appending '-IF77 -1177 -IU77 -lpc -Im* to ihe last command 
would not hurt, and might be required in moie complex cases. 

There is one remaining trick in linking Pascal and C or Fortran 
77 routines, and that has to do with nested procedures and 
functions and nonlocal variable access. Neither C nor Fortran 
77 have these, and there is no provision in the runtime environ- 
ment for them. Pascal, however, uses something called a 
'display' to be able to get at nonlocal variables. The display 
manipulation is normally compiled in-line; for procedure 
parameters, the compiler uses those 'extra' names. 
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PUTTING DATA INTO MEMORY 



Last column I left you with a 
program that created a menu 
driven environment that could be 
run on almost any OS-9 system. 
It presented menus that permit- 
ted access to more menus or ran 
programs. All the menus it used 
were to be located in a directory 
called /DD/MENIJ. I have not 
noticed If there are any major 
bugs, but I did come across an 
annoying problem. Every time a 
new menu is read. It is done by 
disk access. It takes time to find 
a file, open it, read It and close It. 
The result is menus appearing at 
whatever rate the file is read. 

There are a few solutions. First, 
we can throw the whole thing 
away and pronounce It a failure. 
Second, get a hard disk with 
faster access time. Third, add a 
RAM disk and dump all the files 
to a reserved area in RAM. Fi- 
nally, put it into memory in the 
form of a OS-9 module. We will 
pass on the ib-st three ideas and 
go right to the last one. This 
month we will create a Data 
Module. 

For late comers let me give the 
whirlwind tour of the OS-9 mod- 
ule. It is a special file that can be 
loaded Into memoiy. It has a 
header, a body, and the CRC. The 
header Identifies it as a loadable 
module. It has information 
regarding the name, module size. 
Its type and language, its revision 
number and whether its sharable. 



The body Is almost whatever is its 
Intent. This could be executable 
object code. Baslc09 I-Code. and 
Pascal P-Code. There is one 
other. It is the Data module. 

The Data Module Is not execut- 
able. It Is only Intended to hold 
information In memory. Putting 
the data into an OS-9 module 
means it can be loaded and linked 
into memoiy. This makes it a 
rather nice convenience. Key 
information used by a program 
can be kept in memory. 

The header for the Data module is 
similar to other modules. It starts 
out with the usual two sync bytes 
$87CD. Then comes the module 
size and name offset. The type 
and language are $40. The attrib- 
utes and revision are still used. 
The header has Its parity. After 
the parity comes a entry location 
for the data and the amount of 
memory the module requires 
which Is usually 0. The module 
header looks like this 



Address 


2 


rtes Usage 


$00 


Sync Bytes ($87CD) 


$02 


2 


Module Size 


$04 


2 


Name Offset 


$06 


1 


Type /Language 


$07 


1 


Attribute/Revision 


$08 


1 


Header Parity 


$09 


2 


Data Offset 


$B 


2 


Memory Size 



After the header comes the actual 
data. It can be whatever you 
want to store in memory. The 
OS-9 System has a few modules 
in the boot that are Data Mod- 
ules. A familiar one Is 1NIT which 
contains Information used at 
startup. By the way. its Type/ 
Language byte Is $C0 for System 
Module /Data. Like all modules 
the last 3 bytes are the CRC for 
the module. 

In Listing 1. 1 have a put a trivial 
example. This a sample assembly 
language program that contains 
information about the ownership 
of the computer. Actually Its my 
address as it appears at the top of 
the column. This information 
may not be real important, but it 
does illustrate how to put data 
into a module form. A few points 
are of interest here. Notice that 
TYPE Is set to DATA, this will 
become later $40. The symbol 
OwEnt Is the data entry point. In 
an executable module, this would 
be where to start. Storage size Is 
0. so I merely put a in the MOD 
statement.. The rest of the 
assembly is straight forward and 
similar to other assembly lan- 
guage listings for OS-9. 

As I said this Is a tilvial example. 
It serves no purpose other than 
illustrative. But it Is a good lead 
into Listing 2. This listing Is for 
the menu program from last 
month. Remember when I men- 
tioned earlier the long access time 
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to the disk drive each time a new 
menu Is displayed. Well. Listing 2 
Is one way to put the data In a 
foim that can be loaded and 
saved In memory. The best way 
to use this one Is to create all the 
menus, merge them and then 
load them Into memoiy when 
appropriate. Probably, this would 
be done from the staitup file. 

Now let me explain a little further 
how this program works. This 
program uses two complex data 
types. One Is for lhe menu entiy 
and the other for the header. 
Some data types are declared 
including TITLE for the menu 
title, ESIZE for the number of 
entiles. ENTRY is the complex 
variable for the entiy and M is the 
complex variable for the header. 

The header Is similar to Listing 1 . 
However, the values of M.SIZ and 
M.NAM are different. These are 
dependent on lhe length of the file 
{ the module ) name. Also. I set 
M.PAR equal to a value, but later 
it will get corrected. 

The next pait of the program 
creates the file with a temporaiy 
file name. Inputs the necessary 
information and writes it. I varied 
from last months version slightly. 
The 01 lglnal version, 1.0. only 
wrote the entries that were re- 
quired for the menu. This version 
writes all the entries, I set this 
value at 10. 

To complete the file, a dummy 3 
byte CRC number is written. This 
reserves space for the later CRC. 
Using Basic09's SHELL function 
the OS-9 command VERIFY is 
used to correct the header parity 
byte and the modules CRC. The 
temporaiy file Is eliminated, lhe 
permanent module's attribute 
bytes — PE and E — are set using 
ATTR. 

Once you have created the load- 
able data files, they can be put 
Into memory with the LOAD 
command . A good idea would be 



to merge them under one file 
name. In OS-9 Level II. a module 
is put into a single block of 
memory. Each file loaded will be 
put into Its own block. This Is not 
veiy memoiy efficient. So by pre- 
merglng, they are loaded succes- 
sively Into a single block. 

All that Is needed Is to read them 
from the MENU program. The 
procedure in Listing 3 does this 
this method. It uses two tech- 
niques that differ from in Listing 
2. Othei wise, the idea Is the 
same, except it Is reading the 
information rather than writing it. 
At this point In time, the modules 
have been loaded into memoiy. 

The fust technique is using a 
program called SYSCALL. The 
one I use Is from the program 
package BASIC09 TOOLS avail- 
able from SouthEast Media. It is 
also a part of the 3 Volume set of 
the programs from the Basically 
OS-9 column. These aie also 
available from SouthEast Media. 
Another form of SYSCALL comes 
with newer releases of Baslc09. If 
you use that one switch the 
arguments in the call. So on line 
027B: 

RUN syscalUregs.llnk) 

becomes 

RUN syscall(link.regs) 

SYSCALL is used to access the 
OS-9 system calls F$Llnk and 
F$Unllnk. F$Link links the 
module, lhe variable REGS 
consists of all the standard 
registers. REGS.X points to the 
module name and REGS.A is the 
type and language which is $40. 
The call returns with the REG.U 
pointing to the module's data 
entiy address and REGS.Y point- 
ing to its entry address. 
FSUnlink using REGS.U unlinks 
the module when finished. It Is 
only passed the module's address. 
REGS.U. 



Once the module's location is 
known, PEEK Is used to transfer 
the data to the variables — TITLE, 
ESIZE. and ENTRY. In standard 
basic, PEEK is usually used to 
access a portion of memoiy. In 
OS-9 it is used the same, except 
that lhe module must first be 
linked into the processes memory 
area. Hence, the earlier use of 
F$Llnk and F$Unllnk. 

Listing 3 follows this order. Link 
to the module. Using PEEK 
transfer the data to the variable. 
And then Unlink the module, lhe 
call to lhe procedure is similar to 
the program Get_Menu from last 
month except I declare the pa- 
rameter variables within 
GBet_Menu to be in bytes. This 
makes it easier to handle the data 
transfer. 

STYLO FOR COCO 3 OS-9 

Before I leave this month. I must 
tell you that the column is once 
again being written with STYLO, 
the word processor from Stylo 
Software. Inc. lhe system I am 
running it on is the Coco 3 with 
OS-9 Level II. All I can say Is it Is 
great! 

I could go on and tell you about 
its dynamic screen update fea- 
ture. The screen shows how the 
printed page will look. I could tell 
about about how it will handle 
various printers. It will even do 
proportional spacing which 
makes my daisy wheel printer 
looks fine. In stead I will tell you 
about how it allows you to use the 
Coco 3 Windows. 

Windows are the nice feature of 
allowing concurrent running 
process to occupy a part of the 
screen. Right now I have 3 shells 
running. The one I am on is an 
80 column with green letters on a 
black background. Another is 80 
column with yellow letters on 
black. And the third is a 40 
column with blue letters on white. 
I can run stylo on 3 screens. If I 
wish 
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Stylo for the Coco 3 permits the terminal to be configured for different types of screens. This Is different 
from the older Coco version which held you to 3 fixed screen types — O-PAK, G051 and Word-Pak. You are 
allowed up to 35 different terminal configurations. It comes with ones like RS Window 80 Column. RS 
Window 40 Column. DEC VT-52. and ADM-3A. You can also create new ones if you don't like these. Now 
you can attach an external terminal to the Coco 3 via an RS-232 port. 

Next time I will tell more about windowing. For now let me say that STYLO Is available from SouthEast 
Media for $69.95. This Is a special price and I don't know how long It will last. If you want a fine word 
processor for your Coco 3 OS-9 Level II system, this is you chance. 

That is it for now. See you next time! 



Listing 1 



00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00023 
00024 
00026 
00027 
00028 
00029 
00030 
00031 
00032 
00033 
00034 
00035 
00036 
00031 
00038 
00039 
00040 
00041 
00042 
00043 
00044 
00045 
00046 
00047 
00048 



• Name: Owner 

• By: Ron Voigts 

• Date: 12:OEC-1988 



• Version 1.0 Original 



Purpose: 

This module shows how to 
create a loadable, data module, 
tt is a simple example using my 
name, and address. 



nam Owner 

* 

• use /dd/defs/defsf lie 
if pi 
endc 



0040 
0081 



0000 B7CD0050 



0OOD 4F776E65 
0012 01 



TYPE 
REVS 



set 

set 



DATA 
REENTtl 



OwNam fcs 
Version fcb 



mod OwEnd, OwNam, TYPE, REVS, OwEnt , 
Owner* 



0013 OwEnt equ 

* This the data area 
0013 S26F6E20 fee 

001D 00 fcb 

001E 32303234 fee 

0031 OD 

0032 476C656E 



"Ron Voigts* 

c$CR 

"2024 Baldwind Court* 
fcb CSCR 
fee 'Glendale Heights, IL 60139" 



004C 0D 

004D FB0A28 

* 

0050 



OwEnd 



fcb CSCR 

emod 

equ * 
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Listing 2 



• Version 1.0 



(• Version 2.0 



PROCEDURE make_menu 

0000 

001E 

0021 

0033 

0044 

0056 

0059 

0017 

Q07A 

0099 

009C 
O0B6 
O0B9 
00D6 
0009 
00FD 

one 

011F 
013C 
013F 
0142 
0143 
015E 
0185 



Name: Kake_Henu 
By: Ron Voigts 
Date: 21-NOV-88 



Original 



RDV 



* This version will create a memory 

* module for the menu program. 



(* Set up complex data type 

TYPE entry type-category : INTEGER; parameter : BOOLEAN; menu line : STRING 1 64 ; ; coiwund: STRING [64] 

TYPE moduleheader-snc: INTEGER; aiz : INTEGER; nam: INTEGER;~tl :BYTE; ar:BYTE; par:BYTE; ent : INTEGER; 



mem: INTEGER 
01BA 



01BB 
01CE 
01DA 
01E6 
01EO 
01F9 
0200 
020E 
0211 
021E 
0225 
0226 
0236 
024P 
0250 
0264 
0210 
0281 
02BD 
0299 
02A5 
02B1 
02C2 
02CE 
02D6 
02D1 
02F1 
0305 
0307 
0308 
031B 
0325 
0326 
033F 
0353 
0363 
0372 
037C 
03B0 
03BC 
0396 
0398 
03A3 
03A4 
03B4 



(* Set up variables 
DIM s:STRING(32] 
DIM t:STRING|l] 
DIM path:BYTE 
DIM tltle:STRING[64] 
DIM eslze: INTEGER 
DIM entry(lO) :entry_type 
DIM m:module_header 
DIM temporary :BYTE 
DIM version:BYTE 

(* Get file name 

INPUT "Enter file name: ',i 

(* Set up constants 

m.snc:-$B1CD 

m.siz:-$0511+LEN(s) 

m.nam:-$0D 

m.tl:-$40 

m.ar:-$Bl 

m.par :-$5B 

m.ent :-S0E + LEN(s] 

m.mem:-$00 

version :»$01 

(* Create a temporary file 
CREATE Ipath, "temporary" : WRITE 
PRINT 

(• Write out header 
PUT Ipath, m 

(* Write out name to file 
FOR 1:-1 TO LEN(s) 

temporary :-ASC (MID$ (s, i, 1) ) 
IP KLEN(s) THEN 

PUT Ipath, temporary 
ELSE 

temporary : -temporary +$ 80 
PUT Ipath, temporary 
ENDIF 
NEXT i 

(* Write version 
PUT Ipath, version 
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03BE 

03BF (* Get menu title 

03D0 INPUT "Enter menu title: (64): ".title 

03F0 PUT Ipath, title 

03FA PRINT 

03FC 

03FD 

03FE (* How many entries? 

0412 INPUT "Enter number of entries: [10): ".esize 

0439 PUT fpath, eslze 

0443 

0444 (* Get the the Information for each Item 

046C FOR 1:-1 TO eslze 

047F PRINT 

04B1 PRINT 'Entry - %i 

0492 PRINT 

0494 INPUT "Enter category: ".entry (1) .category 

04B4 PRINT 

04B6 INPUT "Parameter? <Y/N> : ",t 

04D1 IP LEFTS (t,l)-«Y" OR LEFTS <t, 1) -"y" THEN 

04EC entry(l) -parameter :»TRUE 

04FA ELSE 

04FE entry (i) .parameter : -FALSE 

OSOC ENDIF 

050E PRINT 

0510 INPUT "Enter menu line: [64): ", entry ( 1) .menu_line 

0537 PRINT 

0539 INPUT "Enter command: [32]: ", entry (1) .command 

055E NEXT 1 

0569 

056A (• Write out the entry 

0580 PUT Ipath, entry 

05SA 

05BB (* Write out a dummy CRC 

05 A3 FOR 1:-1 TO 3 

05B5 PUT tpath, temporary 

05BF NEXT 1 

05CA CLOSE tpath 

05DO 

05D1 (* Correct the CRC and header parity 

05F5 SHELL "verify u ^temporary >"+s 

0612 SHELL "del temporary" 

0623 SHELL "attr "+S+" e pe" 

063B 

0639 END 

063B 

Listing 3 

PROCEDURE get_menu 

0000 

001A 

001D 

002E 

003F 

00S3 

0056 

0070 

0073 

00BB 

00BE 

00A7 

00 AA 

00CB 

00EC 

0103 

0106 

011F 

0120 (* Passed arguments 

0133 PARAM file (32) :BYTE 

013F PARAM title <64) :BYTE 

014B PARAM eslze (2) :BYTE 

0157 PARAM entry<1310) :BYTE 

0163 



* Name: Get_Menu 

* By: Ron Voigts 

* Date: 13-DEC-19B7 

* 

* 

* Version 1.0 Original 



* This procedure links to a menu 

* In memory and passes the data 

* to the menu program. 
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0164 
017F 
01A4 
0U5 
01BB 
01BF 
01CB 
OlCF 
0106 
01D7 
01E3 
01EB 
01F3 
01F4 
0217 
0227 
0242 
0244 
024F 
0250 
0261 
0260 
027B 
028A 
0290 
02A5 
02A7 
02A8 
02B9 
02C4 
02CC 
02DC 
02EA 
02F5 
0301 
0305 
0306 
0317 
031F 
032F 
033D 
0346 
0354 
035S 
0359 
036A 
0372 
0382 
0390 
03 9B 
03A7 
03AB 
03AC 
03B0 
03E9 
03F8 
040B 
0413 
0415 
0416 
041B 



(* Set up complex data type 

TYPE reglsters-cc, a,b,dp:BYTE; x, y, u : INTEGER 

(* Set up variables 
DIM 1: INTEGER 
DIM regs : registers 
DIM link:BYTE 
DIM unllnk:BYTE 

(* Constants 

llnk:-S00 

unlink:«$02 

(* Fix file name with an EOL marker 
FOR 1:-1 TO 32 

IF flle(l)-SFF THEN flle(l)-50O 

ENDIF 
NEXT 1 

I* Link to Module 

regs.a:*$40 

regs. x:-ADDR(f lie) 

RUN syscall (regs. link) 

IF LANDUegs.cc, SOD-l THEN 

ERROR regs.b 
ENDIF 

(* Get menu title 

1 :-regs .y 

count :"1 

WHILE countc-SIZE(title) DO 

title (count) :-PEEK(l) 

l:-i+l 

count :»count*l 
ENOWHILE 

(* Get menu esize 

count :■) 

WHILE countOSIZE (esize) DO 

esize (count ) :«PEEK (1) 

i:-i+l 

count :»count+l 
ENOWHILE 

(* Get menu entry 
count :-l 
WHILE count<-SIZE (entry) DO 

entry(count) :-PEEK(l) 

l:-i+l 

count i-count+l 
ENOWHILE 

(• Unlink Module 

<* REGS.u" should still point to module start 

RUN syscall (regs. unlink) 

IF LAND [regs. cc, $01) -1 THEN 

ERROR regs.b 
ENOIF 

END 



FOR THOSE WHO\ 
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A Tutorial Scries 

By : Ronald W Anderson 
3540 Sturbridge Court 
Ann Arbor, MI 48105 



USER 



From Basic Assembler to HLL's 



NOTES 



Pat Enhancement 

I have Just returned from a visit 
to New Zealand with a few 
thoughts from John Spray regard- 
ing Improvements In PAT. John 
suggested an "automatic book- 
mark" feature that would let you 
return to the last line that had 
been edited. To do that. I had to 
change two lines of PAT and add 
one more line. Now the sequence 
ESC A G will get you to the last 
line that you edited. (I.e. actually 
changed something, typed som- 
ethng other lhan a command). I 
think It will be a handy addition 
to PAT. and I had never thought 
of the possibility before John 
mentioned It to me. 
Thanks John. 

John also thought It would be 
nice to allow a split screen and 
editing of two files at the same 
time, to facilitate moving portions 
of one file to another. I think that 
would be a nice addition too, but 
It will take a while to Implement. 
Perhaps, it would be easier to use 
two different screens, one for each 
file being edited, and have a 
command to switch back and 
forth between files. That would 
be more straightforward, but it 
would still be a major undertak- 
ing In PAT. It would involve 
having two screen buffers, two 
edit buffers, two sets of pointers, 
etc. Perhaps I could swap values 



for the various pointers when 
switching screens. Anyway, it is a 
rather major undertaking, but it 
would add a feature that seems to 
be present in more and more of 
the latest editors. With this 
feature the user could load two 
files, mark a portion of one and 
move or copy It to the other, etc. 

Utilities for SK*DOS 

While I was gone I received a 
pile of mail. One of the Items was 
a disk from Michael Evenson in 
Texas. Michael sent me a bunch 
of utilities with documentation. 
He indicates that these are avail- 
able on his BBS at 1-817-488- 
8398 and that they are also avail- 
able on Peter Stark's BBS for 
SK*DOS. There were several sets 
of useful things on the disk, not 
the least interesting to me was a 
package called MSTOOLS. These 
contain utilities to read files from 
MS-DOS format disks to SK'DOS 
foimat. Included are MSDIR, 
which does a directory of an MS- 
DOS disk. MSREAD which reads 
a file from MS-DOS to SK'DOS. 
MSWRITE, which writes a file 
from SK'DOS to MS-DOS disks, 
and WRMSDOS which writes 
multiple files from SK'DOS to 
MS-DOS. 



The documentation reads In 
part "This is a shareware product. 
You can have it for free or anyway 
you can get it. ... it's free but all 
donations are graciously ac- 
cepted. If you don't contribute, 
don't complain about what it 
doesn't do. If you do contribute, 
you have the right to call my BBS 
and let me know what else you'd 
like it to do. If I think it's a grand 
Idea. Ill add it and you'll get a 
diskette mailed to the address 
you gave me when you regis- 
tered.... Donations for registra- 
tion for MSTOOLS start at 
$25.00. That gives you one full 
year of attention at the complaint 
window." 

I guess 111 send off my check for 
that package. It has already 
proven to be useful. I have Just 
reconfigured a Tandy 1200-HD of 
my son's for a different printer. 
For some reason it didn't Just 
come up and work right off. It is 
on my list of things to fix In the 
near future, but meanwhile my 
son David had a paper to do for 
school. He had started typing it 
In using PC -Write on the Tandy. 
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"How will I get this pilnted out?" 
"No problem". I said. ITljust copy 
It onto a 5" floppy, bring it down 
to my 68000 system and copy It 
onto the SK*DOS hard disk, 
insert a few formatting commands 
and pilnt It out using JUST. 

I hadn't tried MSREAD before, 
but I fired it up and it worked 
perfectly first by! I input the 
formatting commands and did a 
little proofreading and half an 
hour later we had 7 pages of text 
all nicely pilnted. Thanks Mi- 
chael. 

There Is a larger package on the 
disk called CTOOLS. This one is 
a must if you do any "C" program- 
ming. You'll probably like and 
use it regardless of whether you 
are an occasional "C" programmer 
or you program in "C" all the 
time. The package includes: 

FCHAKr: 

A program to print a listing even if 
It requires multiple files to do it. 

PP: 

A Pretty Printing program that 
will print a source listing with 
proper indentation for compound 
statements etc. 

CIJTIL: 

A general purpose filter program 
that can do case conversions, 
convert tabs to spaces, eliminate 
form feeds, make control codes 
visible, indicate 8th bit set, etc. 

CBC: 

This valuable utility checks for 
proper pairing of curly braces, 
parentheses, quotation marks, 
and comment delimiters in a 
program. I don't know about you, 
but I sometimes get comments 
mis-nested by leaving a close 
comment out. That results in a 
chunk of program that I expect to 
be compiled being considered a 



comment by the compiler. CBC 
catches and flags such omissions. 

DIFF: 

This is a file difference lister. 1\vo 
files can be compared to see if 
they are the same. If not. DIFF 
can re-sync after an added line in 
one of the files is printed out. It 
truly does list the differences in 
two files. 

CREP: 

GREP is IJNIXESE Jargon for 
"FIND". You give It a string and a 
filename and it searches the file 
for the string, listing all lines in 
which a match occurs. GREP Is 
an acronym for Global Regular 
Expression Parser. Such non- 
sense, had you not guessed, is In 
my opinion the ultimate in snob- 
bery. I don't like unnecessary 
jargon In any field including my 
own (Electrical Engineering). In 
these times when one has to 
Integrate mechanics, electronics, 
communications and computers, 
we don't need to make things 
unnecessarily difficult for some- 
one outside of our particular field. 

CCREF: 

This program produces a nice 
cross-index of variables in a "C" 
program. 

ASCII; 

Prepares an ASCII code list for 
characters with codes from to 
127 decimal. 

If you detect a little sarchasm 
with the name GREP. you are 
correct. It might as well be called 
FAST for Find Ascll String in Text 
file, or maybe 1.AOS for List All 
Occurrences of String. Somehow 
it really gets to me when program- 
mers of operating systems go that 
far out of their way to come up 
with an obscure and meantngles 
name for a simple utility that 
could have a very descriptive 



name. My gripe is not with 
Michael Evanson. of course, but 
with ihe UNIX people who seem to 
thrive on the "let's make it hard 
for outsiders" attitude. 

There were other programs on 
the disk as well, but the point of 
this is the availability of such 
utilities on bulletin boards for Ihe 
taking if you have Ihe proper 
communications software. Mi- 
chael, how about a little article in 
'68' MJ about communications 
software. You had some on the 
disk you sent me. Tell the readers 
what they need to access your 
bulletin board and that of Peter 
Stark, to download these nice 
utilities. Are they (the utilities on 
the bulletin board) available in 
object form or only source??? 

Assembler Utility 

I have missed a clean-up utility 
for disk backup and other files 
and I had done a simple one 
called XBAK to delete backup files 
on a disk when along came the 
latest version of SK'DOS that has 
multiple directories. I realized 
that when I was in my T directory 
(Text files such as letters, etc.) I 
might want to type XBAK and 
have only the .BAK files in the 
current directory be deleted. I 
spent some time improving on 
XBAK. The result was a utility 
called XXX (for crossing out of 
multiple files). It works like this. 
Suppose you are in the T direc- 
tory and you want to delete all the 
.BAK files. You simply command 
XXX BAK <CR> and all the files 
with the BAK extension (but only 
in the current T directory) are 
deleted. The utility assumes that 
you want to delete files on the 
WORKING drive. If you want to 
use XXX on your System drive 
you can temporarily make that 
your working drive also. For 
example if you use drive for 
system, you can type WORK to 
make the working drive too. 
XXX is considerably more flexible 
than XBAK in that it allows you to 
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define the extension of the files 
that you want to delete. Suppose 
for instance that you assemble 
your programs and output the 
listing to a .LST file to look at 
later. You might accumulate a 
number of .LST files in your 
assembler directoiy (I use direc- 
tory A). Just type XXX LST and 
they will all be deleted. Previous 
to this implementation, I had 
several X utilities, namely XBAK. 
XCOM. XBIN. XLST. XOIJT. etc. 
Of course each one deleted only 
files with the specific extensions. 

Well. I thought about XXX for a 
while and decided the next day to 
add the capability of reading a 
filename with a wildcard charac- 
ter. I also decided that I could 
call the utility ZAP since it was 
fast approaching the usefulness 
of a utility by that name that had 
been supplied with the SWIPc 
version of FLEX for the 6809 for a 
long time. After a few tries I 
managed to get ZAP to read a 
filename from the command line 
and run through the current 
working directory looking for 
matches, deleting any file that 
matched. ZAP ♦.♦ would simply 
delete all files in a directory (Just 
like the MS-DOS ERASE or 
DELETE utility). ZAP ».BAK 
would delete all backup files. ZAP 
FILEVBAK would delete all files 
whose name starts with FILE and 
with the extension .BAK. The • 
doesn't limit the wildcard to one 
character, so that command 
would delete FILE 1. BAK. 
FILETEST.BAK. FILE123.BAK. 
etc. 

I was satisfied with that for a 
day. but I still wanted more. This 
command still couldn't handle the 
case of a different first letter such 
as in the series ACAT. TCAT. 
SCAT. Tonight I added a single 
character match wildcard, using a 
? for that character. ZAP?CAT.» 
would delete all of the three files 
mentioned above with any exten- 
sion. I tested carefully to see that 
ZAP VC would only delete files 



with the extension single letter C 
and not match .COM or .CMD 
These can all be matched by 
using ZAP ».C 

At this point I am relatively 
satisfied and comfortable with the 
utility. The code is only 266 bytes 
and the listing just more than two 
pages. Ill Include the listing here 
and make the source available on 
Peter Stark's bulletin board. Ill 
also send a copy to Sid Thompson 
so It will be available through the 
SK'DOS user's group in Atlanta. 

Later - 1 did find another im- 
provement for ZAP. As previously 
written, it had no provision for 
changing the case of the input 
command line, zap ».bak didn't 
do anything since my filenames 
are all upper case. I would have 
to use ZAP VBAK. I added the 
code to convert the command line 
string to upper case and it works 
fine for my system. If you have 
set the flag so that filenames may 
be upper or lower case and be 
distinct and separate, you will 
want to commend out the lines 
that are Indicated, that convert 
the command line parameter to 
uppercase. If you are using 
upper case only filenames, just 
use the listing as printed. I've 
used this one frequently since 
completing It. 

Monochrome Monitor 
and the PT68K-2 

The keyboard and monochrome 
board arrived from Peripheral 
Technology and I went out and 
bought a monitor locally, so I 
decided It was time to try PAT on 
the monitor and free up my serial 
terminal. Of course I found some 
more bugs In PAT and fixed them 
so now the operation is quite nice 
with that hardware. I had a silly 
bug that took me three evenings 
to track down. Once found it was 
totally obvious and simple to fix. 
I remarked that It looked like an 
unitialized variable and It was. 



Pat is about 53 pages of source 
listing so it took a while to figure 
out where to look for It. 

I decided to do some playing 
and see if I could get the cursor 
control working. Alter a little 
detective work I found the combi- 
nation and set PAT up so that in 
normal overlay mode the cursor Is 
an underline but in insert mode it 
is a square, about half a full block 
cursor in height. 

I am estimating the screen 
update rate to be about equiva- 
lent to a serial terminal running 
at 40K baud. That means that It 
can fill the 80 by 24 screen In Just 
about 1/2 second when the whole 
thing Is rewritten. I am having a 
little trouble getting used to the 
keyboard because the keys are a 
little soft for my touch, but they 
are relatively long stroke and they 
don't make until they bottom. 
The feel is a little indicative of a 
sudden "pop" to the made posi- 
tion as you push down on them. 
That could be called the "oilcan 
effect". My largest trouble seems 
to be that I drop spaces frequently 
if I am not paying attention. I 
think 111 like the keyboard a great 
deal after I use it a little more. It 
Is one of the AT style keyboards 
and my ONLY complaint Is that 
they stuck the ESC key over at 
the top right rather than at the 
left, next to the 1 key where it 
belongs. I haven't had all that 
much trouble getting used to its 
new location, however. It must be 
that I don't use the escape com- 
mands very often while entering 
text. 

I found a 12 Inch Packard Bell 
amber monitor with TTL Inputs at 
the local Service Merchandise 
store. It was $89. Adding the 
price of the keyboard and mono- 
chrome graphics board I spent 
just about $205. I would have 
gone this way in the first place, 
except for the fact that I have a 
couple of serial terminals around. 
A nice serial terminal these days 
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costs $400 to $500. so this is the 
relatively Inexpensive way to go. 
IVe spent some time working out 
the bugs In PAT that were re- 
vealed by trying to run It with the 
video board. Then. In response to 
a letter from a PAT user, I decided 
to tackle the displaying of marked 
blocks In the same attribute as 
the status line. With the mono- 
chrome board. I've used reverse 
video. I have the display worldng 
and I've tested most of the edit 
operations to see that they don't 
disturb the limits of the marked 
block. With the extent so clearly 
visible. I found a number of 
operations that caused the limits 
of the block to change needlessly, 
and fixed them. The monitor does 
not use a character space to 
change the attribute as some 
terminals do. so for a start. I have 
made the block marking work 
with so called non-modal termi- 
nals. The last step is to connect a 
serial terminal that is modal and 
make the marking work In that 
mode as well. I'll have that done 
shortly, but there will be a test 
version sent out to a few people 
who presently have PAT for 
SK*DOS. I'll expect a few funny 
situations to arise where there 
will have to be some fixes. 

Having the full IBM style key- 
board has prompted me to rede- 
fine some keys to make the cursor 
arrows and several other keys 
work as edit function keys. In 
addition to the arrows. I've de- 
fined HOME as goto top of file. 
END as Bottom of file. Pg Up to 
move up a page In the file. Pg Dn 
Its obvious opposite function. INS 
and DEL to Insert and delete 
blank lines respectively, and + 
and - to search forward and 
backward respectively if a search 
string has been defined. Since I 
use A I for a tab key, I've also 
redefined the AT style keyboard 
TAB key (Immediately to the left of 
Q) as an escape key, since that is 
where ESC Is located on most 
terminals. I've left the original 
keys with their normal functions. 



so that, for example either A Z or 
the keypad + key will search 
down. etc. 

I plan to "retrofit" the 6809 
version of PAT with this latest. (Of 
course I won't be able to Imple- 
ment the cuisor pad key assign- 
ments). That version. Incidentally 
now has quite a few added fea- 
tures over the last released 
version 2.5. If any of you would 
like an upgrade alter I have 
finished debugging this latest 
change, send me a blank disk and 
a stamped return-addressed 
mailer In which to return your 
disk and I'll send you the PAT file, 
all the TERM files that I have, and 
a manual addendum describing 
the new features, along with the 
manual files for version 3.0. If 
you have only single sided double 
density disk drives, please send 
two disks. If you have single 
density and single sided please 
send three. In any event, please 
spell out the format that you 
want. I can accomodate 40 and 
80 track drives, single or double 
density and single or double 
sided. This offer Is for the flex 
6809 version of PAT only. The 
SK'DOS version Is not yet clean 
enough for an official release. 
Pending the completion of the 
present version and a test of the 
video version with the CGA 
adaptor and a color monitor, the 
SK'DOS version will be ready at 
last. 

Hardware Bug Cured 

I have had the Pr68k-2 system 
for some time now. When I wired 
up the parallel port connector on 
the back. I did It supposedly so I 
could put a DB-25 connector on 
one end of a 25 conductor ribbon 
cable and an Amphenol 36 con- 
tact connector on the other to be 
compatible with an Epson or 
other Centionlcs compatible 
printer. It Just happened that I 
had some 34 conductor cable so I 
crlmpped the Amphenol on the 



end of that. When I got to the 
other end. of couise. I didn't have 
room for more than 25 connec- 
tors, so I separated the cable and 
cut off the 9 extra ones. What I 
didn't realize at the time Is that I 
had left wires hanging on the 
Centronics end that became 
antennae for some of the printer 
control functions. The result was 
that when I printed a letter. I 
would sometimes get strange 
characteis In place of spaces, and 
letters would be missed now and 
then. ,p One day 1 happened to 
have an IBM compatible printer 
cable handy and I tried It. Much 
to my amazement, there were no 
errors. I looked at my ribbon 
cable and It dawned on me what I 
had done. I simply stripped the 
cable down to 25 conductors and 
cut the excess ofi at the printer 
connector. No more problems! 
The pi inter works fine with the 
supplied PARALLEL driver and 
the first 20 wires of the 25 pin 
connector. That is pins 1-10 and 
14-23. Those are "left Justified" In 
the amphenol connector so that 
pin 1 Is pin 1 . Connections are 
very straightforward. Pin 1 Is the 
printer "strobe". Pins 2 to 9 are 
data bits to 7, being the low 
order bit. Pin 10 is the not 
acknowledge signal. The adjacent 
pins In the second connector row 
(19-28) are ground Pins 1 1 -13 
may be left connected at the 
printer end since they are output 
signals from the printer. The 
offending wire In my cable was 
probably pin 3 1 of the amphenol 
connector at the printer. It Is the 
not INIT signal which reinitializes 
the printer. Should you desire to 
make a universal cable for print - 
eis. the IBM standard Is as fol- 
lows: 



Straight through Indicates 
ribbon cable crlmp-on connectors. 
Note that 1-13 of the DB-25 end 
up on 1-13 of the amphenol. 
Because the amphenol is two 
rows of 18 pins, the first pin on 
the bottom row would be pin 18. 
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parallel 


port 
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Printer Connector 






1-13 






straight through 


1-13 




14 






(not straight through) 


14 




15 








32 




16 








31 
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36 




18-25 






straight through 


23-30 



whereas the first pin on the 
bottom row of the DB=-25 Is pin 
14. The IBM standard would 
seem to use the first four pins on 
the bottom row of the DB-25 
which would usually be ground 
pins, to connect four functions. 
Pin 14 is the signal for auto line- 
feed after CR, to the printer. Pin 
15 of the DB to pin #® of the 
Amphenol Is the ERROR signal 
from the printer. Pin 16 of the 
DB to pin 31 of the Amphenol Is 
the signal to Initialize the printer. 
Pin 17 of the DB to pin 36 of the 
printer Is the SELECT Input of the 
printer. This Input must be LOW 
to select the printer. I have pur- 



chased an IBM compatible printer 
cable that looked as though It 
simply had a DB-25 crimped on 
one end and an Amphenol 36 on 
the other. When I removed the 
cover at the Amphenol end, I 
discovered that the wires that 
would have been the first four In 
the bottom row were not con- 
nected there, but rerouted under 
the crimp cover to the pins Indi- 
cated above and more or less 
hand cilmped in place and 
dressed so that the cover would 
still fit. These four signals are not 
essential to the PARALLEL driver 
on the -2 (They are in fact not 



used). You could simply leave 14 
and 1 5 open since they are 
signals FROM the printer. 16 
should be connected to +5 volts 
(through a IK resistor) and pin 17 
can be ground along with 18-25. 

Should you want to wilte a 
smarter printer driver that would 
report errore. initialize the 
printer, and check for printer 
selected, out of paper, or error, 
pin 1 1 is BUSY from the printer, 
pin 12 is OUT OF PAPER, and pin 
13 is SELECTED. All positive (i.e. 
♦4 to 5 volts) for TRUE. 

+ + + 
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Most of you will remember 
Bob from his tenet of letters 
on XBASIC. If you like il or 
warumore, let Bob or us 
know. We want to give you - 
what you want! 



The Mathematical Design of Digital Control Circuits 



By: R.Jones 

Micronics Research Corp, 

33383 Lynn Ave., Abbotsford, B.C. 

Canada V2S 1E2 
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last lime we were together I mentioned that there's some jungle ahead, but it gets tougher so gradually I think maybe you should 
all keep going until it gets too tough, as you're bound to pick up some useful knowledge along the way. And who knows?, you 
may find that you can actually make it all the way through, especially as I'll be woiiing hard to make the way as easy as possible. 
So let's give it a try, shall we? OK then, here we go into the territory of 

BOOLEAN MATRICES 

CIRCUIT ANALYSIS 

Prior to studying iterative networks, which arc a very special bianch of network theory, we've generally restricted the analysis and 
synthesis of our circuits to two-terminal networks of the series-parallel type, where power comes in at one terminal and goes out at 
another to operate some output device. At this stage of the game you should experience little or no difficulty in deriving the 
Boolean expression for any such network, or, alternatively, in cons&ucting the network from the given Boolean expression. For 
example, if we look at the circuit of Diagram 99, we can very quickly write the Boolean expression as 

ab ♦ c(d + e) 

or, if we started off with this expression, we can quite easily reconstruct the original network. Leastways, I sure hope so! 




Continued on page 36 
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PATH-TRACING 

Now, how did we go about deriving the Boolean expression in the first place? Whether we really thought about it in this way or 
not, what we actually did was to write down the various paths which took us fiom input to output. Thai is, either (i) a AND b OR 
(ii) c AND (d OR e). This process is so commonly used that it's been given a name, appropriately enough it's called "path- 
tracing", and is a standard technique employed in order to write the Boolean expression for a network under consideration. 





Diagram 100 

We've already met the circuit of Diagram 1 00a in our discussion of bridge and non-planar networks, but we'll examine it now as a 
slightly modified version of Diagram 99. All we've done is to disconnect from the output one spiing of the d-contact, and transfer 
it to the junction of the "a" and "b" contacts, but this simple move has severely complicated the derivation of its Boolean expres- 
sion. We've previously puzzled over whether the left-most mesh should be wtiticn as "a + cd" or "c + ad". Or is it possible that 
neither is correct? 
Path-tracing solves the problem for us! The Boolean expression for this circuit is really 

ab + ce + ade + cdb 

So far so good, but suppose that we were supplied with this expression to begin with, and asked to draw the circuit which it 
represents, litis wouldn't SEEM to be a difficult task for us, as we'd merely Eactorise it to give (as one possibility) the expression 

a(b + de) + c(e + db) 

from which we'd draw the circuit of Diagram 100b. Although this circuit uses eight contacts instead of the original live, a machine 
wired in this way would be indistinguishable in operation from the first. 

FUNCTION v NETWORK 

This discussion biings us to a most important point, namely that a Boolean expression gives us, NOT the circuit diagram , as we 
may have thought till now, but the conditions under which the network will transmit power. It describes the FUNCTION of the 
circuit (that is, the CONDITIONS under which an electrical path will be established), NOT the actual circuit itself nor its wiring!! 
As long as we restrict ourselves to series-parallel networks, we can read the expression as though it were also the ciicuit. but in the 
back of our minds we should always remember that THE FUNCTION IS NOT THE SAME AS THE CIRCUIT. 
What we need, now that we're heading into more advanced systems, is some new way of describing a circuit mathematically, so 
that we're kept informed, not only of the function, but also the physical layout of the network. Fortunately for us, there is such a 
way, which makes use of the Boolean matrix (plural, matrices), which has the added advantage that we're able to keep track of 
several functions at one and the same time, PLUS all the intricate relationships which may exist among them. 

CONSTRUCTOR A BOOLEAN MATRIX FROM A CIRCUIT-DIAGRAM 



b a 




Diagram 101 
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The first step in obstructing a Boolean matrix is to number all "nodes", or junciion-poinis between contacts, as you see in Diagram 
101. By convention, "1" is allocated to the power input-line, then the various output teiminals are numbered, and finally all "non- 
terminal", or intermediate, nodes. 
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Diagram 102 

"Ihe Boolean matrix of Diagram 102 is a "fourth-order", or 4-by-4, matrix. Elements of the matrix are always referred to first by 
ROW, and then by COLUMN, *the reverse of our normal way of leading a K-map! For example, a23 is the 'element at the 
intersection of ROW-2 and COLUMN-3, and element a34 is the element at the intersection of ROW-3 and COLUMN -4, the "a" 
part signifying that we're looking at matrix-a, rather than matrix-b. The matrix is constructed from the network in the following 
manner: 

On squared paper, we number a set of rows and columns from 1 to 4, to correspond with our nodes, and fill in the diagonal from 
top-left to bouom-*right with Is. Then, in element a 12 we'll write the name of any contact which will transmit current from node- 
1 to node-2 WITHOUT GOING THROUGH ANY OTHER NODE. ITiere's no such animal, so we insert "0" in this element. 
Next we'll *look at al3, and write here the name of any contact which will transmit 'current from node-1 to node-3, which, of 
course, is the a-contact. In a!4 we write "c", because this is the contact connecting nodes 1 and 4. OK so far? Glad you came 
along? 

Now let's do Row-2, by commencing to the right of its 1-entry, that is, with "element a23, and insert here a "b", following on with 
element a24, where we insert an "e". Finally, in row-3, again commencing to the right of its l-*element, we insejt a "d" in element 
a34. And we're done! 

We know that a relay contact is capable of passing current in either direction, which, in terms of our Boolean matrix, means that the 
path between nodes 2 and 3, for example, is the same as that between nodes 3 and 2. However, if we were considering a network 
in a DC (direct-curren t) system with diodes in some of the paths, this would not necessarily be the case, as current capable of 
flowing from node-2 to node-3 may be blocked by a diode if it tried to flow in the opposite direction. Having said thai, let's get 
back to our matrix, where **we"ve decided in effect that element a23 IS the same as element a32, thus making our matrix symmet- 
rical. Therefore we complete our filling-in by making column- 1 read the same as row-1, column-2 the same as row-2, and so on. 
Remembering thai"l" means a permanent connection, you'll readily see why the diagonals are filled in with Is. It's because node- 
1 is obviously pennanently connected to node- 1, node-2 to node-2, elc. Before we get down to studying this matrix a little more 
seriously, let's play around with it for a while and have some fun. 

CONSTRUCTING A CIRCUIT-DIAGRAM FROM A BOOLEAN MATRIX 

First of all, 1 think we all agree that there 'd be no problem in reconstructing the original network diagram from our matrix. We'd 
simply put down four dots on a sheet of paper, numbering the left-most with a "1", the right-most with a "2", and the intermediate 
ones "3" and "4". Then, reading only those elements above the diagonal (called "super-diagonal", as opposed to those below, 
which are "sub-diagonal"), we'd insert no connection directly between nodes 1 and 2, an a-contact between nodes 1 and 3, a c- 
contact between nodes 1 and 4, and so on and so forth. And there we'd have our original network, sometimes after a little straight- 
ening out of lines! 

PATH-1RACING THROUGH A BOOLEAN MATRIX 

L«t's carry on "playing", shall we? Suppose we start on the figure " 1" of row- 1 outside the matrix proper, and then move horizon- 
tally through the row until we come under the "2" of column-2. Here we see the entiy "0", which tells us that there is NO direct 
path from input to output. So let's try something different! let's start again at the "1" of row-1 and move horizontally to, say, 
coluinn-4, where we're informed that this IS possible via a c-contact, AND FURTHER that if we pivot off AT RIGHT-ANGLES 
down column 4 to row-2 we'll end up on an e-con tact, which, of course, means that we can get from node- 4 to node-2 via "e". We 
have, on this little trip, moved from node-1 to node-4 to node-2, that is, from input to output, through the contacts "c" and "e" (in 
that order). If we now look at our original network, we'll see that this is in fact a possible path from node-1 to node-2. 
Suppose we try a different path through the matrix, each lime doing a right-angled pivot from our cunent direction . Let's start 
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ASSEMBLERS 

ASTRUK09 from S.E. Media-- A "Siructuied Assembler for ihe 6809" 
which icquirci ihe TSC Macro Assembler. 
FLEX, SK-DOS, CCF . 199.95 
Macro Assembler for TSC ■ The FLEX. SK-DOS STANDARD Assembler. 

Special -- CCF $3500; FLEX. SKDOS $50.00 
OSM Extended 6809 Macro Assembler from Lloyd I/O. - Provides local 
labels. Motorola S-rccords. and Intel Hex records: XREF. Generate 
OS 9 Memoty modules under FLEX, SK-DOS. 
FLEX, SKDOS, CCF. OS-9 $99.00 
Relocating Assembler/Linking Loader from TSC. •- Use with many of the 
C and Pascal Compilers. 

FLEX, SKDOS, CCF $15000 
MACE, by Giaham Trod fnm Wiitdrush Micro Systems -- Co-Resident 
Editor and Assembler; fast interactive A.L. Programming for small to 
medium-sized Programs. 

FLEX, SKDOS. CCF - S75XX) 
XMACE -- MACE w/Cross Assembler for 6800/1/2/3/8 
FLEX , SK-DOS. CCF ■ $9800 

DISASSEMBLERS 

SUPER SLEUrH from Computer Systems Conmltaras Interactive 
Disassembler, extremely POWERFUL! Disk File Binaiy/ASCH 
Examine/Change. Absolute or FULL Disassembly. XREF Generator, 
label "Name Changer", and Files of "Standard Label Names'* for 
different Operating Systems. 
Color Computer SS-SO Bus (all wl AL. Source) 
CCD (32K Req'd) Object Only $49 00 

FLEX. SK-DOS $99.00 - CCF Object Only $50.00 UniFLEX $100.00 
CCF, wu « Source $99.00 OS 9, $101.00 ■ CCO. Object Only $50.00 
68010 SUPER SLEUTH - Similar to 8-Bit Version except written 

oi "c: 

68010 Disassembler $100.00 FLEX. UniFLEX. UNIX. XENIX. 

MS-DOS. SKDOS. OS-9 

OS-9/68K Object Only $10000 or wi\h Source $200.00 
DYNAMITE+ - Excellent standard "Batch Mode" Disassembler. Includes 

XREF Generator and "Standard Label" Files. Special OS-9 options 

with OS-9 Version. 

CCF. Object Only $100.00 - CCO. Object Onty$ 59.95 

FLEX. SKDOS , Object Only $100.00 ■ OS-9. Object Only$150.00 

UniFLEX Object Only $300.00 

CROSS ASSEMBLERS 

CROSS ASSEMBLERS from Compiler System Consultants — Supports 
1S02/5. Z-80. 6800/1/2/3/8/1 1/HC II . 680«. 6805/HC05/ 146805, 6809/ 
00/01. 6502 family. 8080/5. 6O2O/1/2/35/C35/39/40/48/C48/49/C49/50/ 
8748/49. 8O31/51/875I32OO0 and 68000/68010 Systems. Assembler 
and Listing formats same as target CPU's format. Produces machine 
independent Motorola S-TcxL Includes Macro Pre-Procosor. Written in 
"C". 68000 or 6809 •Macinlosh'Atari, FLEX. CCF, UniFLEX, OS-9, 
XENIX. UNIX. MS-DOS, SKDOS 

any object or source each -$50.00 

any 3 object or source -$100.00 

Set of ALL object $200.00- wiin source $500.00 
XASM Cross Assemblers for FLEX. SK-DOS from S.E. MEDIA -This set 
of 6800/1/2/3/5/8.6301. 6502. 8080/5. and ZS0 Cross Assemblers uses 
the familiar ISC Macro Assembler Command I Jne and Source Code 
format, Assembler options, etc.. in providing code for target CPU's. 

Complete set. FLEX. SKDOS only - $150.00 



CRASMB from LLOYD I/O - Supports Motorola's. Intel's. Zilog's. and 
other's CPU syntax for theae 8-Bit micropnxzxKin : 6800. 6801. 6303, 
6804. 6805. 6809. 6811 (all varieties); 6502. 1802/5. 8048 family. 8051 
family. 8080/85. Z8. Z80, and TMS-7000 family. Has MACROS. 
Ijjcal labels, label X-REF, Label Length to 30 Chars. Object code 
formats: Motorola S-Recorda (text), Intel HEX-Records (text). OS-9 
(binaiy), and FLEX, SK-DOS (binary). Written in Assembler ... e.g. 
Very Fait. 
CPU TYPE- Price each: 

For MOTOROLA INTEL OTHER COMPLETE SET 
FI.EX9 S150 $150 $150 $399 

SK-DOS $150 $150 $150 $399 

OS-9/6809 $150 $150 $150 $399 

OS-9/68K J432 

CRASMB 16.32 from LLOYD I/O - Supports Motorola's 68000, and has 
same fealmes as the 8 bit version. OS9/58K Object code Formal allows 
this cross assembler to be used in developing your programs for 
OS-9/68K on your OS-9/6S09 computer. 

FLEX, SK-DOS, CCF, OS.9/6809 $249.00 

COMMUNICA TIONS 

CMODEM Teleoorrvnuni cations Program from Compiler Systems 
Consultants, Inc. — Menu-Driven; supports DumbTeimittal Mode, 
Upload and Download in non -protocol mode, and the CP/M "Modem?" 
Christenten protocol mode to enable convn unicalion capabilities for 
almost any requirement. Written in "C. 

FLEX, SK-DOS, CCF, OS-9, UniFLEX, UNIX, XENIX, MS-DOS, 
with Source $10000 - without Source $50.00 
X-TALK from S.E. Media - X-TALK consists of two disks and a special 
cable, the hookup enables a 6809 SWTPC compiler to dump UniFLEX 
files directly to the UniFLEX MUSTANG-020. This is the ONLY 
currently available method to transfer SWTPC 6809 UniFl£X files to a 
68000 UniFLEX system. Gimix 6809 users may dump a 6809 
UniFLEX file to a 6809 UniFI £X five inch disk and it is readable by 
the MUSTANG-020. The cable is tpecially prepared with internal 
connections to match the non-standird SWTPC SO/9 I/O Db25 
connectors. A special SWTPC S+ cable set is also available. Users 
should specify which SWTPC system he/she wishes to communicate 
with the MUSTANG-020. The X-TALK software is furnished on two 
disks. One eight inch disk contains S.E. Media modem program C- 
MODEM (6809) and the other disk is a MUSTANG-020 five inch disk 
with CMODEM (68020). Text and binaiy files may be directly 
tmnsfened between the two systems. The C-MODEM programs are 
unaltered and perform as excellent modem piognuns also. X-TALK 
can be purchased with or without the special cables, but this tpsdsi 
price is available to registered MUSTANG-020 users only. 

X-TALK Complete (cable, 2 disks) $99.95 

X-TALK Software (2 dirks only) $69.95 

X-TALK wish CMODEM Sourm $149.95 
XDATA from S.E. Media - A COMMUNICATION Package for the 
UniFLEX Operating System. Use with CP/M, Main Frames, other 
UniFLEX Systems, etc. Verifies Transmission using checksum or 
CRC; Re-Transmits bad blocks, etc. 

UniFLEX. $299.99 



ArilbMIII; LtfA* 

o.os-s. s> sir. •cos 

K.FLEX. ir.rjnlH.EX 
CCt . Cofaf OaoiniUr OS-* 
CCF ■ Cater Comeuur FLEX 




South 'East (Media 

S90Q Cassandra Smith XJ. ■ JTagtm, Tn. 57545 




*• Shipping •*» 

A<M !» U&A.MH.IU*) 
For.Hn S«u-C*» AUd S» 
Tan l»n Atnrall A44 IB* 
Or GO Jo. Shitftm} Out; 



*OS-*lnTniimirtDJMIcfw«f»ind M'<of>U 'Kl.KX iiwi t'ntKl.KX iri Tradwiurluaf Tthnlnd syn™ CmiH— ti.*gK»POS li i TruWimrt of Sur n Srftwir. SytminCarp. 



30 



March '89 



66 Micro Journal 



Telephone: (615) $42-4600 SOtltft TrOSt fMedia 



Telex: 5 106006630 



OS-9, 'Um'JCLX, *}L'LX, S'KWS 



PROGRAMMING LANGUAGES 

PL/9 from Windluih Micro Systems •- By Graham Tiotl A combination 
Editor Compiler Debugger. Direct source-to-object compilation 
delivering fast, compact, re-entrant, ROM-able, PIC. 8 A 16-bil 
Integer? & 6-d>git Real numbers for all teal-woild problem t. Dtrca 
control over AU.Sytton resources, including inlcnupts. 
Comprehensive libtaiy support; simple Machine Code interface; itcp- 
by-slep tracer for instant debugging. 500+ page Manual with tutorial 
guide. 

FLEX. SKDOS. CCF ■ $198 00 

PASC from S.E. Media ■ A FLEX9. SKDOS Compiler with a definite 

Pascal "flavor*. Anyone wit a bit of Pascal expeiience should be able 
to begin using PASC to good effect in short order. The PASC package 
comes complete wit three sample programs: ED (a syntax or structure 
editor), EDIT OR (a simple, public domain , screen editor) and CI IESS 
(a simple chess program). The PASC package comes complete with 
source (written in PASC) and documentation. 
FLEX. SKDOS 195.00 

WHIMSICAL from S.E. MEDIA Now supports Real Numbers. "Structured 
Programming" WITHOUT losing t e Speed and Contiol of Assembly 
1 Jtnguagel Single pass Compiler features unified, user-defined I/O*, 
produces ROMable Code; Procedures and Modules (including pie- 
compiled Modules); many "Types" up to 32 bit Integers, 6-digit Real 
Numbers, unlimited sized Arrays (vectors only); Interrupt handling; 
long Vatiable Names; Vaiiable Initialialion; Include directive; 
Conditional compiling; direct Code insertion; control of t e Suck 
Pointer, etc. Run-Time subroutines inserted as called duiing 
compilation. Normally produces 10% less cade than PU9. 
FLEX, SKDOS and CCF ■ 1195.00 

KANSAS CITY BASIC from S.E. Media - Basic for Color Computer OS-9 
with many new commands and sub-funaions addad. A full 
implernenutian of the IFTIIEN-ELSE lope is included, allowing 
neBjj>glo255 levels. Strings are supportad and a subset oft e usual 
string functions such is LEFTS. RIGHTS, MTDJ, STRINGS, etc are 
included. Variables are dynamically allocated. Also included are 
additional features such as Peek and Poke. A must for any Color 
Computer user running OS-9. 
CoCo OS-9 $3995 

C Compiler from WtndVusn Micro Systems by James McCosh. Full C for 
FLEX, SK-DOS except bit-fields, including an Assembler. Requires 
the ISC Relocating Assembler if user desires to implement his own 
Libraries. 

FLEX. SKDOS. CCF ■ $295.00 

C Compiler from Introl - Full C except Doubles and Bit Fields, 

si/urnlincd for the 809. Reliable Compiler, FAST, eflicieni Code. 
More UNIX Compatible t an most. 

FLEX. SKDOS. CCF. OS-9 (Level II OSLY), UniFLEX . $575.00 

PASCAL Compiler from LucWala - ISO Based P Code Compiler. 
Designed especially for Microcomputer Systems. Allows linkage to 
Assembler Code for maximum flexibility. 
FLEX. SKDOS and CCF -1190 00 

OmegiSoft PASCAL from Certified Software - Extended Pascal for 
systems and real-time prr^ramrning. 

Native eSOOQKtOiO Gsmpikr, $575 for base package, options available. 
For OS-9/K80D0 and PDOS host system. 
809 Cross Osrnptler (OS-9/YS8000 host) S700 for complete package. 



KBAS1C - from S.E. MEDIA - A "Native Code" BASIC Compiler whic is 
now Fully TSC XBASIC compatible. The compiler compiles to 
Assembly language Source Code. A NEW, streamlined. Assembler is 
now included allowing the assembly of LARGE Compiled K-BASIC 
Programs. Condiri anal assembly reduce* Runtime package. 
FLEX. SK-DOS. CCF, OS.9 Compile r /Assembler $99 DO 

CRUNCH COBOL from S.E. MEDIA - Supports large subset of ANSI] 
Level 1 COBOL wit many of the useful Level 2 features. Full FLEX, 
SK-DOS File Structures, including Random Files and the ability to 
process Keyed Files. Segment and link large programs at runtime, or 
implemented as a set of overlays. The System requires 56K and CAN 
be run wit a single Disk System. A very popular product. 
FLEX. SK-DOS, CCF .$99.95 

FORTH from Stearns Electronics - A CoCo FORTH Programming 
language. Tailored to the CoCol Supplied on Tape, transferable to 
disk. Written in FAST ML. Many CoCo functions (Graphics. Sound, 
etc.) Includes an Editor, Trace, etc. Pnrryics CPU Catty Rag 
accessibility. Fast Task Multiplexing, Clean Interrupt Handling, etc. for 
the "Pro". Excellent "learning" tooll 
Color Computer ONLY ■ $5895 

FORTHBU1LDER is a stand-alone target compiler (crosscompiler) for 
pioducing custom Forth systems and application programs. 
All of t e 83-slandard defining wotds and central structures are 
leccgnwed by FORTH BUILDER. 

FORTHBUILDER is designed to behave as much as possible like a 
resident Fort inicipretcr/compiler, so that most of the established 
techniques for writing Forth code can be used wrthuul change. 
Like compilers for ol er languages. FORTHBUILDER can operate in 
"batch mode". 

The compiler recognizes and emulates latget names defined by 
CONSTANT a VARIABLE and is readily extended wit "oompile- 
umc" defuuDocu to emulate specific target words. 
FORTHBUILDER is supplied as an executable command file 
configured for a specific host system and target prucessor. Object 
code produced from the accompanying model source aode is toyalty- 
free to licensed users. 

FLEX, CCF. SK-DOS - S99.95 

EDITORS & WORD PROCESSING 

JUST from S.fi. Media - Text Formatter developed by Ron Anderson; for 
Dot Mania Printers, provides many unique features. Output 
"Formatted" Text to the Display. Use the FVRJNT.CMD supplied for 
producing multiple copies of the "Formatted" Text on the Piintei 
INCLUDING IMBEDDED PRINTER COMMANDS (vety useful at 
other limes also, and woilh the price of the program by itself). "User 
Configurable" for adapting to other Printers (comes set up for Epson 
MX-80 wit Grafuu); up to ten (10) imbedded "Printer Control 
Commands*. Compensates for a "Double Width" piinled line. Includes 
the normal line widi . margin, inden, par-jr/apti, space, vertical skip 
unci, page length, page numbering, centering, fill, justification, etc. 
Use wit PAT or any other editor. 

* Now supplied as a two disk set: 

Disk HI: JUST2.CMD object file. 

JVST21XT PL9 sount FLEX, SKDOS ■ CCF 

Disk 02: JVSTSC object and soiree in C: 

FLEX, SKDOS. OS9, CCF 

The JTSC and regular JUST C source are two separate programs. JTSC 
compiles to a version that expects TSC Word Processor type 
commands, (.pp .sp ce etc) Great for your older text files. The C 
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source compiles lo a standard syntax JUST CM D object file Uiing 
JUST syntax (,p ,u ,y etc.) Wiih ill JUST funoioni plui levcul 
■dditionil printer formsuing functions. Reference the JUSTSC C 
source. For those wanting an excellent BUDGET PRICED word 
proocuor, with features none of the others have. This ii ill 

Disk (I) ■ PL9 FLEX only. FLEX, SK-DOS &. CCF . S49 95 
Disk Set (2) • FLEX , SKDOS <t CCF A. OS9 (C version) . S69.95 

OS-9 68KOOO complete with Source . 179.95 
PAT from S.E. Media - A full feature cereal oriented TEXT EDITOR with 
all the best of "PIE™ ". For those who swore by and loved only PIE, 
this is for youl All PIE features and much morel Too many features to 
list. And if you don't like these, cliange or add your own. PL-9 source 
furnished. "C source available soon. Easily configured to your CRT, 
with special config section. 

Regular FLEX. SKDOS 1129 X 

• SPECIAL INTRODUCTION OFFER ' 179.95 

SPECIAL PATI.'UST COMBO (with source) 
FLEX.SK.DOS 199.95 

OS-9 6SK Version 029.00 

SPECIAL PAVJVST COMBO 68K S249 00 
Note: JUST in "C" source available for 0S.9 
CEDRIC from S.E. Media • A screen oriented TEXT EDITOR with 

availability of 'MENU' aid. Macro definilons, configurable 'permanent 
definable MACROS' - all standard features and the fastest 'global' 
functions in the west. A simple, automatic terminal config program 
makes this a real 'no basse!' product. Only 6K in size, leaving the 
average system over 165 sectors for text buffer - eppx. 1-1,000 plus of 
fire memoryl Extra fine for programming as well as text. 

FLEX, SKDOS 169.95 
IUS-ED1T from S.E. Media - A TSC BASIC or XBASIC screen editor. 
Appended to BASIC or XBASIC. B AS-EDIT is transparent to normal 
BASIC/XBASIC operation. Allows editing while in BASIC/XBASIC 
Supports the following fuhcuoiu: OVERLAY, INSERT and DUP 
LINE Make editing BAS1C/XB ASIC programs SIMPLE! A GREAT 
time and effort saver. Programmers love ill NO more retyping entile 
lines, etc. Complete with over 25 different CRT terminal configuration 
overlays. 

FLEX. CCF. SKDOS 139.95 
SCREDITOR III from Windtush Micro Systems _ Poweiful Screen- 

Oiientad Editor/Word Processor. Almost 50 different commands; over 
300 pages of Documentation with Tutorial. Features Multi-Column 
display and editing, "decimal align" columns (AND add them up 
automatically), multiple keystroke macros, evenAidd page headers and 
footers, imbedded punier control codes, all justifications, "help" 
support, store common command series on disk, etc Use supplied "set- 
ups", or remap the kcyboatd to your needs. Except for proportional 
piinting. this package will IX) IT ALL1 
6900 or 6909 FLEX. SKDOS or SSB-DOS. OS-9 ■ II75D0 
SPELLB "Computer Dicticnaty" from S.E. Media - OVER 150,000 words! 
Look up a word from within your Editor or Word Processor (with the 
SPH.CMD Utility which operates in the FLEX. SKDOS UCS). Or 
check and update the Text after eUiy; ADD WORDS to the Dictionary. 
"Flag" questionable words in the Text, "View a word in context" before 
chaogag or ignoring, etc. SPELI.B first checks a "Common Word 
Dictionary", then the normal Dictionary, then a "Personal Woid List", 
and finally, any "Special Word List" you may have specified. SPEIXB 
also allows the use of Small Disk Storage systems. 

FLEX, SKDOS and CCF - i 129 95 



STYLO-GRAPH from Great Plains Computer Go. - A full-screen oriented 
WORD PROCESSOR - (uses the 51 x 24 Display Screens on CoCo 
fT-FJOSK-DOS. or PBJ Wotdpak). Full screen display and editing: 
supports the Daisy Wheel prcponuaW printers. 
NEW PRICES 6909 CCF and CCO - 199.95. 
FLEX. SKDOS or OS-9 - SI79.95. UniFLEX- S299.95 
STYLO-SPELL from Great Plains Computer Co. - Fast Computer 
Dicticnaty. Complements Stylogiaph. 

NEW PRICES 6809 CCF and CCO - 169 95. 
FLEX. SKDOS or OS-9 . 199.95, UniFLEX. SI49.95 
STYLO- MERGE from Great Plains Computer Co. - Merge Mailing List to 
"Form" Letters, Print multiple Files, etc., through Stylo. 
NEW PRICES 6809 CCF and CCO ■ 159.95. 
FLEX, SKDOS or OS-9 - 179.95. UniFLEX- 1129.95 
STYLO-PAK —Graph ♦ Spell ♦ Merge Package Deallll 

FLEX, SK.DOS or OS-9 . 1329.95. UniFLEX . 1549.95 
OS-9 69000 1695.00 

DATABASE ACCOUNTING 

XDMS from Westchester Applied Baldness Systems 

FOR 6809 FLEX or SK-DOS <S/8") 

Up to 12 groups /I ields per record! Up to 12 character Tile names! Up to 1024 
byte records! User defined screen and print control] Puxsi files) Form 
filesl Conditional executant Process chaining I Upward/Downward file 
linking! File joining! Random file virtual pagingl Built in utilities! Built 
in text line editor! Fully session oriented! Enhanced forms! Boldface, 
Double width, Italics and Underline supported 1 Written in compact 
structured assembler! Integrated for FAST execution) 
XDMS-IV Data Management System 

XDMS-1V is a brand new approach to data management. It not only permits 
users to describe, enter and retrieve data, but also to process entire files 
producing customized reports , screen displays and file output. 
Processing can consist of any of a set of standard high level functions 
including record and field selection, sorting and aggregation, lookups in 
other files, special processing of record subsets, custom rcpun 
ibnnatting, totaling and subtotaling, and picsentation of up to three 
related files as a "database" on user defused output reports. 
POWERFU L COMMANDS t 

XDMS-IV combines the functionality of many popular DBMS software 
systems with a new easy to use command set into a single integrated 
package. We've included many new features and commands including a 
sot of general file utilities. The processing commands are Input- Pnxcu- 
Output (IPO) which allows almost instant implementation of a process 
design. 

SESSION ORIENTED! 

XDMS-IV is session oriented. Enter "XDMS" and you are in instant 

command of all the features. No more wailing for a aommand lo load in 
from disk I Many commands are immed iale, such as CREATE (file 
definition), UPDATE (file editor). PURGE and DELETE (utilities). 
Othen are process commands which are used lo create a user process 
which is executed with a RUN command. Either may be entered into a 
"process" file which is executed by an EXECUTE statement. rnx*ue* 
may execute other processes, or themselves, either conditionally or 
unconditionally. Menus and screen prompts are easily coded, and entire 
user applications can be run without ever leaving XDMS-IV 
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ITS EASY TO USE! 

XOMS-IV keeps data management simple I Rather than design a complex 
DBMS which hides the true nature of the data, we kept XDMS-IV file 
oriented. The user view of data relationships is preset) tad in reports and 
screen output, while the actual data resides in easy la maintain files. 
This aspect permits customized presentation and reports without 
complex redefinition of the database files and structure. XOMS-IV may 
be used for a wide range of applications from simple racoid 
management systems (addresses, inventoiy ...) to integrated database 
systems (order entiy, accounting...) 

The possibilities are unlimited 
FOR 6809 FLEX or SK-DOS(5 B /8" Disk) $349.95 

UTILITIES 

Bask09 XRef from S.E. Media - This Basic09 Cross Reference Utility is a 
Basic09 Program which will produce a "pielly ptinted" listing with each 
line numbered, followed by a complete cross referenced listing of all 
variables, external procedures, and line numbers called. Also includes a 
Program List Utility which outputs a fast "pretty printed" listing with 
line numbers. Requires Basic09 or RunB. 

OS-9 & CCO object only -- S19.9S; with Source - S79.9S 

BTree Routines • Complete set of routines to allow simple implementation 
of keyed files - for your prog rams - running under BasicO?. A real time 
saver and should be a pan of every serous programmers tool-box. 
OS 9 & CCO object only - SS9.95 

Lucldala PASCAL UTILITIES (Requires Pascal ver 3) 

XREF - produce a Cross Reference Listing of any text; oiienled to Pascal 
Source. 

INCLUDE - Include otlter Files in a Source Text, including Binary - 
unlimited nesting. 

PROFILER -- provides an Indented, Numbeicd, "Slructogram" of a Pascal 
Source Text Hie; view the overall structure of large programs, program 
integrity, etc. Supplied in Pascal Source Code; requires compilation. 
FLEX. SKDOS.CCF — EACH J" - $40.00. $'-S50.00 

DUB from S.E. Media - A UnlFLEX BASIC decompiler Re -Create a 
Source Listing from UniFLEX Compiled basic Programs. Woiks with 
ALL Versions or 6809 UniFLEX basic. 
UniFLEX - $279.95 

LOW COST PROGRAM KITS from Southeast Media The following kits 
are available for FLEX, SK-DOS on either 5" or 8" Disk. 

1. BASIC TOOL-CHEST $29.95 
BUSTER.CMD: pretty printer 
UNEXREF.BAS: line cross-ieferenccr 
REMPAC.BAS. SPCPAC.BAS, COMPAC.BAS: 
remove superfluous code 

STR1P.BAS: superfluous line-numbeis stripper 

2. FLEX, SK-DOS UriLITIES KIT $39.99 
CATS. CMD: alphabclically-soncd directoiy listing 
CATD.CMD: date-sorted directory listing 
COPYSORT.CMD: file copy . alphabetically 
COPYDATE.CMD: file copy, by datewder 
FH_EDATE.CMD: change file creation date 

INFO.CMD (& tNFOCMX.CMD): tells disk aaributes A contents 
REL2NK.CMD (& RELINK 82): re -orders fragmented free chain 
RESQ.CMD: undeletes (recovers) a deleted file 
SECTORS CMD: show sector order in free chain 
XI. CMD: super text lister 



3. ASSEMBLERS/DISASSEMBLERS UTILITIES $39.95 

LINEFEED.CMD: 'modularise' disassembler output 
MATH.CMD: decimal, hex, binaiy, octal conversions 
A tables 
SKIP.CMD: column stripper 

4. WORD - PROCESSOR SUPPORT UTILITIES $49.95 
FULI.STOP.CMD: checks for capitalization 
BSTYCIT.BAS (.BAC): Stylo to dot-matrix printer 
NECPRINT.CMD: Stylo to dot-matrix printer filter code 

5. UTILITIES FOR INDEXING $49.95 
MENU.BAS: selects required program from list below 
JNDEX.BAC: word index 

PHRASES.BAC: phrase index 

CONTENT.BAC: table of contents 

INDXSORT.BAC: fan alphabetic son routine 

FORMA TER. BAC: produces a 2-column formatted index 

APPEND. BAC: append any number of files 

CHAR.BIN:line reader 
BASIC09 TOOLS consist of 21 subroutines for Basic09. 
6 were written in C language arid the remainder in assembly. 
All the routines are compiled down to native machine code which 
makes them fast and compact. 

1. CFILL -- fills a suing with characters 

2. DPEEK - Double peek 

3. DPOKE -■ Double poke 

4. FPOS -- Current file position 

5. FSIZE - Hie size 

6. FT RIM — removes leading spaces from a string 
7.GETPR - returns the current process ID 

8. GETOPT - gets 32 byte option section 

9. GETUSR - gets the user ID 
I ft GTIME - gets the time 

11. INSERT -- insert a siring into another 

12. LOWER -- converts a string into lowercase 

13. READY - Checks for available input 

14. SETPRIOR -• changes a process priority 

1 5. SETUSR - changes the user ID 

16. SETOPT - set 32 byte option packet 

17. STIME - sets the time 

18. SPACE — adds spaces to a siring 

19. SWAP - swaps any two variables 
2a SYSCALL - system call 

21. UPPER — converts a string to uppercase 

For OS-9 - $44.93 - lincludes Source Code 

SOFTOOLS 

The following programs arc included in object form for immediate 

application. PL/9 source code available for customization. 

READ-ME Complete instructions for initial set-up and operation. Can even 

be printed out with the included text processor. 
CONFIG one time system configuration. 

CHANGE changes words, characters, etc globally to any text type file. 
CLEANTXT converts text files to standard FLEX, SK-DOS riles. 
COMMON compare two text files and reports differences. 
COMPARE another cheek file that repons mis-matched lines. 
CONCAT similar to FLEX , SK-DOS append but can also list fuel to screen. 
DOCUMENT for PL/9 source files. Very useful in examining parameter 

passing aspects of prooadures. 
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OS -9, llnty VEX, 'J CLX. S'K'WS 



ECHO cchos Co either screen or file. 

FIND in imnioved,/W command with 'palter*" matching and wildcards. 
Very useful 

HEX dumps files in both hex and ASCII. 

INCLUDE! file copy program that will accept "includes" of other disk files. 

KW1C allows routing each word, on each line to the beginning. Very useful 
in a son program, etc. 

LISTD1R a directory listing pogram. Not super, but better than CAT. 

MEMSORT a high-apead teal lile soner. Up to 10 fields may be sorted. 
Very fast. Very useful. 

MULT1COL width of page, number of columns may be specified. A 
MUSTI 

PAGE similar to LIST but allows for a page header, page width and depth. 
Adjust for CRT screen or pi inter » set up by CONFIG. A veiy smart 
piinl diiver. Allows printer control commands. 

REMOVE a fast file deleter. Careful, no prompts issued. Zap, and its gone! 

SCREEN a screen lilting utility. Woid wraps text to fit screen. Screen depth 
may be altered at run time. 

SORT a super version of MEMSORT. Ascending/descending order, up to 10 
keys, case over-ride, son on n" word and son on chars cues if file is 
■mall enough, sons in RAM. If large file, son is constrained to size of 
your largest disk capacity. 

TPROC a small but nice text formatter. This u a complete formatter and has 
functions not found in other formatters. 

TRANSL1T soru a file by x kcyftclds. Checks for duplications. Up to 10 
key files may be mad. 

UNROTATE used with KW1C this program reads an inpui file and unfolds 
it a line at a time, if the file has been soncd each word will be 
presented in sequence. 

WC a word count utility. Can count woids, characters or lines. 

NOTE: Ihll Mt of utilities constats of 6 5.1/4" disks or 2 8" disks, with 
source (PL9). 3 5- 1/4" disks or 1 8" disk without source. 
Complete Set SPECIAL INTRO PRICE: 
5-1/4- with source FLEX or SK-DOS - $129.95 
without source • 179 95 
8" with source - 579.95 - without source $49-95 

FULL SCREEN FORMS DISPLAY from Computer Systems Cbniultanu - 
-TSC Extended BASIC program supports any Serial Terminal with 
Cursor Control or Manoiy-Mapped Video Displays: substantially 
extends the capabilities of the Program Designer by providing a table- 
driven method of describing and using Full Screen Displays. 
FLEX , SK.DOS and CCF. UniFLEX - $25.00, with Source - 150.00 

SOLVE from S.E. Media - OS-9 Levels 1 and II only. A Symbolic Object/ 
Logic VeiilicaUon & Examine debugger, including inline debugging, 
disassemble and assemble. SOLVE IS THE MOST COMPLB1E 
DEBUGGER we have seen for the 6809 OS 9 series! SOLVE does it 
till With a rich selection of monitor, assembler, disassembler, 
environmental , execution and other miscellaneous commands, SOLVE 
is the MOST POWERFUL tool-kit item you can own] Yet. SOLVE is 
simple to use) With complete documentation, a snap! Everyone who 
has ordered this package has raved) See review - 68 Micro Journal - 
December 1985. No 'blind' debugging here, full screen displays, rich 
and complete in information presented. Since review in 68 Micro 
Journal, this is our fastest movcrl 

Uv*U I & II only OS.9 $69.95 



DISK UTILITIES 

OS-9 VDisk from S.E. Madia - For Level I only. Use the Extended 

Memory capability of your SWTPC or Gimix CPU card (or simitar 
formal DAT) for FAST Program Compiles, CMD execution . high speed 
inicr-proccss communications (without pipe buffers), etc, -SAVE that 
System Memory. Virtual Disk sue is variable in 4K increments up to 
960K. Some Assembly Required. 

Level I OS-9 object $79.95; with Source J/49.95 

O-F from S.E. Media - Written in B ASIC09 (with Source), includes: 

REFORMAT, a B AS1C09 Program that reformats a chosen amount of 
an OS 9 disk to FLUX, SK-DOS Format so it can be usad normally by 
FLIiX . SK-DOS; and FLEX , a B ASIC09 Piogram that does the actual 
read or write function to the special O-F Tiansfer Disk: user-friendly 
menu driven. Read the FLEX. SK-DOS Direcloiy, Delete FLEX, 
SK-DOS Files, Copy both directions, etc. FLEX. SK-DOS users use 
the special disk just like any other FLEX. SK-DOS disk 
OS-9 - 6809168000 $79.95 

LSORT from S.E. Media - A SORT/MERGE package for OS-9 (Level I & 
U only). Sorts records with fixed lengths or variable lengths. Allows 
for either ascending or descending sort. Sorting can be done in either 
ASCII sequence or alternate collating sequence. Right, left or no 
justification of data fields available. LSORT includes a full set of 
comments and errors messages. 
OS-9 $85M 

HIER from S.E. Madia ■ HIER is a modern hierarchal storage system for 
users under FLEX. SK-DOS. It answers the needs of ihne who have 
hard disk capabilities on their systems, or many files on one disk • any 
size. Using HIER > regular (any) FLEX, SK-DOS disk (8 - 5 • hard 
disk) can have sub dircaoiies. By this method the problems of 
assigning unique names to files is less burden tome. Different files with 
the exact same name may be on the same disk, as long as they are in 
different directories. For the Winchester user this becomes a must Sub- 
directories are the modem day solution that all current large systems 
use. Each directory looks to FLEX, SK-DOS tike a regular file, 
except they have the extension '.D1R'. A full set of directory handling 
programs are included, making the operation of HIER simple and 
straightforward , A special install package is included to install HIER to 
your particular version of FLUX, SK-DOS. Some assembly required. 
Install indicates each byte or reference change needed. Typically - 6 
byte changes in source (furnished) and one assembly of HIER is all that 
is requiicd. No programming required! 
FLEX ■ SK-DOS $79.95 

COPYMULT from S.E. Media - Copy LARGE Disks to several smaller 
disks. FLEX. SK-DOS utilities allow the backup of ANY size disk to 
any SMALLER size diskeitcs (Hard Disk to floppies. 8" to 5", etc.) by 
simply inserting diskettes as requested by COPYMULT. No fooling 
with directory deletions, etc COPYMULT.CMD understands normal 
"copy" syntax and keeps up with files copied by maintaining direaories 
for both host and receiving disk system. Also includes FJACKUP.CMD 
to download any size "random" type file: RESTORECMD to 
restructure copied * random" files for copying, or nxDpying back to the 
host system: and FREFXINK.CMD as a "bonus* utility thai "relinks" 
the free chain of floppy or hard disk, eliminating fragmentation. 

Completely documented Assembly Language Source files included. ALL 4 
Program (FLEX. SK-DOS, 8" or 5') $99 JO 



*nl |aj,l 

0.OJ-S.J -SX'DOS 
r.siix,u.t>enxi 

CCB .UkrCcarNi OS.1 
CO* • Oatar Conauuv FIM 




South Tost Media 

5S00 CosseMmSmiiA. %£ ■ iV-wn, In. 37343 




•• Shipping •* 

A44 2* USJMatfa.SlJ(n 
rVnfa* SWanAasSm 

Fonts* Airman Add io» 
Or CO JK Salvataa Oiilj 



HW-» In Tr»d<m»r> jfMkrwirr **i Mmjroto.«H.BX »nd tlnW.EX ■rrTrad w ntrtjoTT.rhiilcal ;;«i»ir»i»ll»iili.'H'P(M It i Tr»djw»rli of.su/lt.Snflw.rt SyiwaMffrra, 



34 



March '89 



68 Micro Journal 



'Mepfwne: (61$) 842-4600 Sotltft ( E(lSt ^Media 



Tefcx; 510b00bbM) 



OS-?, 'Uni'JL'LX, 'JL'LX, S'K'DOS 



COPYCAT from Lucidata - Pascal NOT required. Allows reading ISC 
Mini-KLEX. SK-DOS. SSB DOS68. and Digital Roaid< CP/M Disks 
while operating under SK-DOS , FLEX 1 .0, FLEX 2.0. or FLEX 9.0 
with 6800 or 6809 Syjtemj. COPYCAT will not poform miradei. but. 
between the program and the manual, you stand a good chance of 
aacotnpuihii) g » transfer. Alio include* tone Utilities to help out. 
Programs supplied in Modular Source Code (Assembly Language) to 
help solve unusual problem s- 
FLEX. SK-DOS and CCF S'.ISOOO FLEX, SK-DOS 8"S6S.0O 

VIRTUAL TERMINAL from S.E. Media - Allows one terminal lo do the 
work of seveial. The user may suit as many at eight lulu on one 
tenninal, under VIRTUAL TERMINAL and switch back and faith 
between talks at will. No need to exit each one; just jump back and 
foilh. Complete with configuration program. The best way lo keep up 
with: those background programs. 

6809 OS-9 * CCO - object only - $49.95 

FLEX, SK-DOS DISK UTILITIES from Computer Systems Connllanu - 
Elgin (8) different Assembly language (with Source Code) FLEX, 
SK-DOS Utilities for every FLEX, SK-DOS Users Toolbox: Copy a 
File with CRC Ezron; Test Disk (or errors; Compaie two Disks; a fast 
Disk Backup Piogum.- Edit Disk Sedan; Linearis Free-Q>ain on the 
Disk; prinl Disk Identification ; and Soil and Replace the Disk Direcloiy 
(in toned order). — PLUS -- Ten XBASIC Programs including: A 
BASIC Resequencer with EXTRAS over "RENUM" like check for 
mining label definitions, processes Disk lo Disk instead of in Memory, 
etc Other programs Compare, Merge, or Generate Updates between 
two BASIC Programs, check BASIC Sequence Numbers, compaie two 
unsequenced files, and 5 Programs for establishing a Master Directory 
of several Disks, and soiling, selecting, updating, and piinting paginated 
listings of these files. A BASIC Cross-Refercnce Program, written in 
Assembly Language, which provides an X-Ref Listing of the Variables 
and Reserved Words in TSC BASIC, XBASIC, and PRECOMPILER 
BASIC Programs. 

AU. Utilities incline Source (either BASIC or AL. Source Cade). 
FLEX. SKDOS and CCF - SSOOO 
BASIC Utilities ONLY for UniFLEX •• S3OD0 

MS-DOS to FLEX Transfer Utilities to OS-9 For 68XXX and CCOS-9 
Systems Now READ - WRITE - DK - DUMP - EXPLORE FLEX A 
MS-DOS Disk. These Utilities come with a lidi set of options allowing 
Ihe transfer often type files from/to FLEX 4 MS-DOS disks. *CoCo 
systems require the D.P. Johnson SDISK utilities and OS-9 and two 
dr vet of which one must be a "host" floppy. 

•CoCo Version: S69 95 68XXX Version S99.9S 

MISCELLANEOUS 

TABULA RASA SPREADSHEET from Computer Systems Consultants - 
TABULA RASA is similar to DESKTOP/PLAN; provides use of 
tabular ampju rian schemes used for analysis of business, sales, and 
economic condjucni. Menu-driven; extensive rcpon-generabon 
capabilities. Requires TSCs Extended BASIC. 
FLEX, SKDOS and CCF. UniFLEX- 150.00, with Source - S 100 00 
DYNACALC * Hectxonk Spread Sheet for the 6809 and 68000. 
UniFLEX. W9SM, FLEX. SKDOS. OS-9 and SPECIAL CCF - 1250.00 
OS-9 68K - S299.00 



FULL SCREEN INVENTORY/MRP from Computer Systems Consultants 
Use the Full Screen Inventory System/Ma tcrals Requirement Planning 
for maintaining invemoiies. Keeps item field file in alphabetical order 
for easier inquiiy. Locate and/or piint records matching partial or 
complete item, descripbon, vendor, or attributes; find backorderor 
below stock levels. Print-outs in item or vendor order. MRP capability 
for the maintenance and analysis of Hierarchical assemblies of items in 
Ihe inventory file. Require* TSCs Extended BASIC. 
FLEX. SKDOS and CCF. UniFLEX ■ $50.00, with Source . SlOO.OO 

FULL SCREEN MAILING LIST from Computer Systems Consultants - 
The Full Screen Mailing List System provides a means of maintaining 
simple mailing lists. Locale all records matching on paiial or complete 
name, city, state, zip, or attributes for listings or Labels, etc. Requires 
TSCs Extended BASIC. 
FLEX. SKDOS and CCF, UniFLEX- $50.00, with Source - 1100.00 

D1ET-TRAC Forecaster from S.E. Media - An XBASIC program that plana 
a diet in terms of either calories and percentage of caibohydraict, 
proteins and fats (C P C%) or grams of Carbohydrate. Protein and Fat 
food exchanges of each of the six bask food gicvpi (vegetable, bread, 
meal, skim milk, fiuit and fal) for a specific individual. Sex, Age, 
Height. Present Weight, Frame Size. Activity Level and Basal 
MAaholic Rate for normal individual are taken into account. Ideal 
weight and sustaining calories for any weight of the ahuve individual 
are calculated. PruvidM number of days and daily calendar after weigh! 
goal and calorie plan it deiennined. 

FLEX. SKDOS - $59.95, UniFLEX ■ SS9 95 



GAMES 

RAPIER - 6809 Chess Program from S.E. Media - Requires FLEX. 

SK-DOS and Displays on Any Type Tenninal. Feature*: Four levels of 
play. Swap tide. Point scoring system. Two display boards. Qiange 
skill level. Solve Checkmate problems in 1-2-3-4 moves. Make move 
and swap sides. Play white or Mack. Thb la one of Use atronaesi 
CHESS programs running on an} mferuaxo poles- . estimvd USCF 
Rating 1600* (better than most 'club' players at higher levels) 
FLEX. SK.DOS and CCF . $79.95 
NEW 

MS.DOS/FLEX Transfer Utilities For 68XXX and CoCo* OS-9 Systems. 
Now Read, Write. DK. Dump and Explore FLEX & MS-DOS Disks. 
Supplied with a rich set of options lo explore and transfer text type files 
fromAo FLEX and MS-DOS disks. «CoCo OS-9 requires SDISK 
utilities A two floppy drives. 
CCO $69.95 68XXXOS-9 $99.95 

MS-DOS and Macintosh 
Software at Discounted Prices 

"Call for prices, U"U be worth the savings." 

(615) 842-4600 
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again at row- 1 and hop to column 4, then down to row-3 and across tocolumn-2. 1 his lime we've journeyed through the sequence 
1 -4-3-2, and at the same time gone through the elements "c", "d" and "b" in that order. And what do you know? When we 
examine ll« actual network we find that this, too, is a possible path from node-1 to node-2. 

We don't have to restrict ourselves to taminal-nodes! We could, for example, commence on iow-3 and hop to column-4, which 
tells us thai such a nip is possible from node- 3 to node-4 via a d-contact. As an alternative, let's start on row-3, move to column-1, 
then down to row-4, where we (cam that we can gel fiom node- 3 to node-4 by Ihe sequence 3-1-4, corresponding to contacts "a" 
and "C in series, and this is also true in the network itself. So you see, the Boolean matrix does give a very precise picture of the 
network's physical layout and wiring interconnections. 

DERIVING A BOOLEAN FUNCTION FROM A BOOLEAN MATRIX 

This is all very well, you say, but how does this matrix give me the Boolean FUNCTION of the network? It seems that a Boolean 
expression describes the FUNCTION but not tlie NETWORK, and a Boolean matrix describes the NETWORK but not the FUNC- 
TION. Surely we can't be expected to go hopping around through Ihe matrix, writing down EVERY possible path from node-1 to 
node-2 in order to deiive the function! This might be possible with a small matrix such as this, but suppose il were a really huge 
one! How could we be sure thai we hadn't overlooked a possible path here or there? Of course, we couldn'i REALLY be sure, 
whether we were tracing all possible paths via a Boolean matiix or directly from a circuit-diagram either. 
Not till now anyway, BUT, whereas such a (ask would be virtually impossible with the network itself, there ARE systematic 
methods for extracting a network's Boolean expression from a Boolean matrix. I'll describe two of the more common tech- 
niquesfor you, although there are other less commonly used methods. So here is 

PIVOTAL CONDENSATION 

The Tint technique is called "pivotal condensation", this method involving the successive elimination of non-terminal nodes until 
we're left with only those nodes of interest to us. Let's find Ihe function f!2 buried in our matiix (which will describe Ihe transmis- 
sion-function between nodes I and 2) by this sysiem. 
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Diagram 103 

We'll justadopi the minimal technique of eliminating one node at a time, though there are more sophisticated, but MUCH more 
difficult, ways of eliminating two or more at one time. So we'll begin by eliminating node-4, the highest- numbered, from the 
matrix of Diagram 102, though it's not as simple as merely crossing il out of the matrix. We must first draw up a new matrix (see 
Diagram 103), with both the rows and columns numbeicd for our reduced sequence I • 3, and the diagonals filled in with Is. Just 
as before, we'll complete the super-diagonal elements one at a time, and finish off by making all columns read Ihe same as their 
correspondingly numbered rows. 

ELIMINATING A NODE FROM A BOOLEAN MATRIX 

The first element requiring completion in our new matiix (let's call iimacix-'b) is element bl2, so let's switch back tomanix-ain 
102 and indicate that we've marked node-4 for elimination by drawing a red loop around all the elements in row-4, and also those 
in column-4, as though they were loops in a *K-map. Using element al 2 as a pivot (now you see why it's called pivotal-condensa- 
tion) we direct our attention horizontally to our circled column-4, where we see "c", and vertically downwards as well to row-4, 
where we see "e". Then we multiply these elements together (that is, we AND them) to give "ce", 'and add the resuli (that is, we 
OR il) to the element a 12, which is "0". This produces "0 + cc", which is logically equivalent to "ce", so this is what we 'insert in 
element bl2 in our new matrix-b in 103. 

ONE DOWN - TWO TO GO 

The next element to be completed is b |V and so, back in manix-a, s use a, 3 as our pivot, and add to il Ihe product of those ele- 
ments occuning both horizontally and vertically in our circled cok in and row. We get "c" from column 4 and "d" from row-4, 
giving a product of "cd", which we add to the already-existing "a", lo give "a + cd". This is duly recorded in element b 13 ! 
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LAST ONE 

Finally, using element a^ as a pivot, we obtain "b + ed", which we enter in 
element b a , and finish off by making the columns read the same as the rows. 

NOW WE HAVE MATREX-B 

What we've just done is to eliminate the FIGURE-4 from the network of Diagram 101, but leaving the circuit itself otherwise 
untouched. Now only nodes 1, 2 and 3 officially exist, and we sec that matrix-b still describes this new netwoik. For example, 
commencing in row-1 and moving horizontally to column-3, this matiix informs us that we can now get from node-I to node-3 
WITHOUT GOING THROUGH ANOTHER NUMBERED NODE (don't forget that node-4 no longer exists as a NUMBERED 
node) through "a + cd". That is, either via "a" OR via "cd", and so on with other paths, just as we did with matrix-a! 

DERIVING THE ACTUAL TRANSMISSION-FUNCTION 

In order to find f , we still have to eliminate node-3, which would leave us with a 2-by-2, or second order, matrix-c, with the 
single element c, 2 to be filled in. In actual practice, once we've got down to a third-order matiix, we don't bother with creating the 
final matrix, as it's usually sufficient to calculate what the entry SHOULD be. Applying the same principles as before, we now 
pivot on element b (2 in matrix-b and add to it the product of the elements in column-3 and row-3, which are "a + cd" and "b + ed" 
respectively. We get 

ce + (a +• cd)0> + ed) = ce + ab + acd + cdb + cde 

= ce +• ab +• aed +• cdb C'ce" eliminates "cde") 

which is identical with the path found earlier by scanning the netwoik itself. Although we know from the technique of pivotal 
condensation that the final expression above does in fact cover ALL possible paths thiough the network, IT DOESN T GUARAN- 
TEE THAT THE CONTACTS OF EACH TERM ARE IN THE ORDER IN WHICH THEY OCCUR IN THE NETWORK. For 
instance, the third teim in the Boolean expression is "aed", whereas the actual path is in the order "ade", but then, as we noted at 
the beginning of this pan of our journey, the function isn't necessarily the same as the circuit itself. Ine FUNCTION of the term 
"aed" is to inform us that if relays A, E and D are opeiated, there will be a path from input to output. If we wish to know the 
ORDER in which these contacts appear in the path, we'll have to go back to the circuit-diagram or to Uic oiiginal matrix-a, and do 
a little path-tracing in either case! 

Nodes may be eliminated in any order, the procedure lemaining unchanged. We could, for instance, have begun by circling both 
row-3 and column-3 in red, and eliminated node-3 first, but it's usual to move inwards from the outer edge of each succeeding 
matrix. 

TIME TO SET UP CAMP 

And heie's where I think we'll pitch our tents for the night, and let all this sink in! I hope you didn't find it as frightening as you 
thought it might be at first, and that it's given you an interestingly new viewpoint on the relationship between function and net- 
work, perhaps something you've never really thought about till now. If any of you had difficulty in following my explanation, 
now's your chance to let me know, and maybe I can expand, or expound, further on Pivotal Condensation. Next lime we'll look at 
"Laplace's Development", which, I have to admit, is a LITTLE trickier than our current friend P.C. (nothing at all to do with 
Persona] Computer, let me add). 

And as you've all struggled so willingly to keep up with me, I haven't the heart to give you a TEST right now. So just rest easy, 
and when we've mastered the next stage I'll give you a combined 1EST on both techniques. Fair enough? 

... End of Mile 19. Now at marker Mile-20. Roughly half-way through our trip, I'd guess, give or take a mile or two, or maybe 
three! 
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from Lectraet, Inc. 



By James E. Law 
1806 Rock Bluff Rd. 
Htxsan TN 37343 

When PageMaker burst on the MactntDs h scene, 
Jew could have predicted thai this single event 
would be so tnportant tn setting off the development 
of something called desktop publishing. A new 
niche market was created whichprobably had more 
to do with leading to corporate acceptance of the 
Macintosh than any other application. Stnce then, 
an entire Industry has sprung up to support DTP tn- 
volulng DTP magaztnes, DTP service bureaus, DTP 
specialized sojlware. etc. DTP has made a lot of 
money for a lot of people. 

It's not surprtstng then, that Industry Insiders 
would like to repeat this profitable blip in the market 
by developing other ntche markets. That's why you 
hear of desktop this and desktop that. One of the 
latest areas to be so labeled is desktop presenta- 
tions. 

Presentations are a major part of the American 
business environment. If you want to sell products 
or Ideas , presentations are ahnos t always involved. 
Also, in reporting progress or status, tn search for a 
group consensus, or tn coUegial reviews, presenta- 
tions are often kwolved. According to Success 
Magazine (Jan-Feb 1989), there are 25,000,000 
such presentations in the United States ev&y day} 

Presentations vary from tnformaL 'sit awund 
the table' affairs to elaborate multimedia shows. 
Etther can be effective, but researchers have discov- 



ered that presentations accompanied by visuals are 
more likely to be successful In a much quoted 1 986 
study by the University of Minnesota, researchers 
found that presentations with visuals are up to 43% 
more effective than those tn which a speaker Just 
talks. Also, the speaker's credibility can be effected 
by the quality of his visuals. I remember a formal 
presentation tn my company where highly paid 
consultants were to present the findings of a 3- 
month study. When black and white transparen- 
cies made from a mixture of typed and handwritten 
pages were used, my perception of the consultants' 
competence sagged. 

In the predesktop presentations era, the op- 
tions for generating visuals were Itmtted. Often an 
overhead transparency for a typed page was the 
extent of it Of course. If you had the funds to hire 
a graphics agency or were big enough to have 
graphics department tn-house, thenfancier presen- 
tation visuals were possible. 

lhanks to a new generation of software that 
made Its debut on the Macintosh, anyone can 
quickly prepare hlghquality visuals. Of course, you 
still have to have some graphics knowledge to turn 
out works of art, but anyone with a few hours 
tratntng can turn out colorful text charts with graph- 
ics elements. 
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Over the lastyear, the number of such software 
packages has expanded, to Include More II, Power 
Point, Cricket Presents. StandtngOut and others, I 
highly doubt that the desktop presentation market 
is big enough to support all these contenders. A 
large company may need many hundreds oj copies 
of word processing software or data base software 
but how many desktop presentation programs will 
they need? Only a Jew, at besL 

In this revtew, I would like to look at Standtng- 
Out which is distributed by Letraset, Inc. Standtn- 
gOut was originally distributed under the name 
ReadySetShow. Apparently this detracted from 
Letiaset's othermajor package ReadySetGo. so the 
name was changed. 

As regular readers of 68 Micro Journal will 
remember, a detailed review of ReadySetGo was 
published tn 1987. Later, a follow up revision to 
this fine program was written up. If you are familiar 
wtlh ReadySetGo. then you know almost every- 
thing you need to know about StandtngOut Ihey 
probably share 70% of the same codiiig. As a 
matter of fact, tfyou take ReadySetGo, remove the 
ability to work in columns, and add the ability to 
sort slides and create auxiliary documents (e.g.. 
notes pages, and handout pages), you have 
StandtiigOut. Ihls is not to say that StandlngOut is 
deficient in power. As we will see. this sharing of 
the best of its cousin ReadySetGo. well equips 
StandtngOut to produce stunnb\g results. 

StandtngOut basically provides 3 functions. It 
allows you to design attractive and effective vtsu- 
als in 35mm. overhead transparency, or other 
formats with a variety of text and graphics ele- 
ments. It provides for the easy sorting of these 
visuals and of presenting them in an on-screen 
slide show. Finally, SinndingOut allows you to 
easily prepare notes pages or audience handouts 
containing your visuals. Let's start by examining 
StandingOut's ability to work with text 



Words. Words, and More Words 

You can do anything with text In StandtngOut 
that you can do with most desktop publishing pro- 
grams. The spacing of paragraphs, lines, and 
words can be adjusted. Letter spacing and kerning 
are supported. Automatic hyphenation keeps your 
text lines straight A spelling checker with an 
85.000 word dictionary ensures speakers don't 
lose credibility through spelling errors in their visu- 
als. Of cowse, tabs, glossaries, and almost all 
functions of a full featured word processor are 



provided. Reverse type is supported. Youcaneasily 
cause text to wrap around regular or irregular ob- 
jects. 

Otherextras areptovided whichaddanice touch 
to text slides. For example, text entries may auto- 
matically fi amed, filled, and/ or shadowed. Also, 
leading or trailing characters may be automatically 
added to text entries. For example, a 'bullet' symbol 
can be made toproceed each line tn a text bullet chart 
and will automatically appear when RETURN is 
pressed Another helpful 'extra' ts a option that 
allows you to change the case of selected text You 
can make the selected text all capitals, all lower case, 
first letter of each word capitalized, or thejirst letter 
of sentences capitalized. 



High Style 

What happens when you fintsh a presentation 
using Geneva fonts then decide that the headings 
should be Cooper Black and sub tier bullets should 
be Helvetica bold? With some presentation pack- 
ages, a lot of reword would be required. Not so with 
StandtngOut if you used stylesheets. A style sheet 
is simply a set of formatting Instructions which you 
name and save. To set up a style sheet you select 
style from the Presentations menu, indicate that you 
want to set up a "New' style sheet, give a name to 
your style sheet, then enter the desired specifica- 
tions for your text You may set the font, size, style, 
alignment, indents, spacing (word, line, and para- 
graph) and hyphenation. 

When you get ready to type text, you may then 
select an existing style sheet and the text wUl be 
formatted accordingly. If all the headings tn your 
presentation were for matted under the control of the 
same style sheet, you can reformat all the headings 
at once by changing the Style Specification sheet. 
StandtngOut allows you not only to modify and use 
style sheets, but also to import ihem from other 
presentations and to duplicate or delete them. 



Fancying It Up 

No one buys a high powered desktop presenta- 
tion program just to place text on a visual. To make 
visuals interesting and effective, graphics elements 
are usually added. An extra benefit is that consis- 
tent gmphtcs elements (e.g., colors, borders) used 
throughout a presentation tend to tie the presenta- 
tion together — to add visual continuity. 
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StandingOut provides a full list of graphics 
tools which can be used to prepare any "draw " type 
image you may need. 7Tie resulting objects may be 
sent to thejront (or back), grouped (or ungtouped) 
aligned, duplicated, locked In place, printed or not 
printed, and otherwise manipulated. By selecting 
"Special Effects." you can automatically add a 
'shadow' to objects. Specification boxes may be 
called up for each object to precisely specify the 
object's position by screen coordinates. Inaddltlon 
to the usual geometric shapes (e.g.. ovals /circles, 
rectangles, lines). StandingOut allows you to draw 
a variety oj parallelograms and triangles. While bit 
mapped images can be imported into StandingOut 
this software contatns no tools to develop or modify 
bit mapped Images. 

StandingOut hasextenslue charting capability. 
A wide variety of line, bar, pie, and other charts 
may be produced with signlficantftexwillty to cus- 
tomize the final product. 



Continuity of Design 

When you start up StandingOut you can use 
Page setup to indicate whatformat your visual will 
take (35mm, overhead transparency, or other). 
Oddly. StandingOut assumes that overhead trans- 
parencies will be in a verUcalformat and if you want 
a horizontalformat, you will have to enter the appro- 
priate dimensions. (I would have thought that most 
overhead transparencies are in horizontalformat, 
not vertical, and the default specifications would 
have been set accordingly.) 

"Master" templets can be set up for a presenta- 
tion such that selected text or graphics elements 
entered on the master will appear on each visual in 
the presentation. You can use this feature, for 
example, to place a logo and border in exactly the 
someplace on each visual. This not only saves time, 
but adds cohesiveness. continuity and professional- 
ism to your presentation. 



Color 



Order Out of Chaos 



No black and white presentation will ever at- 
tract as much tnittal attention as one in living color, 
StandingOut provides you with 256 premtxed col- 
ors. Additionally, you can customize your own 
colors and even give names to your custom colors. 
You can assign a color to text any other object on 
your slide, and to the background of the slide. You 
can assign colors even if you are working with a 
monochrome screen. Although all you will see is 
black, white, and gray, the asstgned colors will be 
saved with yourfUe and can be viewed later if you 
have access to a color monitor. 



Slide Design System 

Have you ever designed a slide that you were 
especially proud of— that was especially well bal- 
anced and artistic? Perhaps you may want to do 
another slide in afuture presentation similar to the 
one that worked so well last time. SteppingOut 
facilitates the saving and reuse of designs in a 
feature called the Slide Destgn System. By select- 
ing "Add Design" from the File menu, the general 
design of the slide currently displayed is added to 
a library of saved designs. This saved design, 
which you can name, contains graphics features, 
text blocks, and picture blocks. Text and picture 
blocks are empty and do not maintain their con- 
tents. The fat mat of text (size, font style, color) to 
be included in text blocks is maintained, however. 



If you are like me. you finalize your presentation 
by choosing slides from previous presentations, 
drawing some new slides, culling out the less effec- 
tive ones, and rearranging the order of the slides 
several times. StandingOut lets you accomplish 
these functions painlessly. Slides can easily be 
transferred between files (presentations). You can 
view thumbnail size Images of your slides on the 
screen and rearrange their order merely by clicking 
on a slide and drag it to where you want it. Slides 
may be deleted by selecting the thumbnail Image 
and pushing BACKSPACE. You can also view a list 
of the titles of your slides and use this window to 
delete slides or rearrange their order as above. 



Notes Pages and Audience Handout Pages 

StandingOut. like other desktop presentation 
packages, provides for easy preparation of notes 
pages and audience handout pages. Notes pages 
contain a miniature image of a slide, any standard 
features you want (e.g.. titles, dates, logo, border), 
and your speaking notes. Tlve audience handout 
pages contain either 2, 4. or 8 miniature slide images 
on apagealong with any desired standard features. 
This certainly saves on copying cost and provides 
the audience a concise reminder of what you had to 
say. 
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Show Time! 



The StandingOut Interface 



SlandlngOut can present the visuals of a pres- 
entation on screen as a slide show. You can set the 
number of seconds that each visual will be dis- 
played or can program the visuals to change when 
the mouse is clicked. Additionally, a variety of tran- 
sitions can be used in going from one visual to 
another, (e.g., wipe lejl to right, fade, etc.) The slide 
show can also be controlled from the keyboard. 
This is a very handy capability. You can gauge the 
overall effect or your presentation by viewing it as 
a slide show. Nonstandard slides will stand out 
like a sore thumb. If you have access to a LCD 
screen projector, you can use the slide showfeature 
to present you graphics directly from the computer 
to your audience without having to prepare trans- 
parencies or slides. 



Just Read the Manual 

StandingOut comes with a general users man- 
ual and a collection oj minor manuals covering the 
tutorial and the design of presentation graphics. 
The general users ' manual is a quality product and 
does a complete Job oj clearly explatntng the use of 
StandingOut. There is a major defect. 1 believe, in 
the overall documentation package and that is the 
lack of effective examples of what you can do with 
this product. Don't expect to get a lot of good ideas 
about the design and layout of slides from Standtn- 
gOut's manuals. Instead, you will find simplistic 
and unattractive black and white examples of visu- 
als. Even the templets pwvided with StandingOut 
strike me as betng remarkably unimpressive. The 
inclusion of well designed examples (preferably in 
color) would be of tremendous help to users and no 
doubt would help to sell this package. 



StandingOut shares essentially the same inter- 
face as its look alike ReadySetGo. I find tt to be easy 
enough to use, but some users 

find it a little more hostile environment than some 
other related programs. For example, before you can 
enter text, you must draw a text block. Before you 
can import graphics, you must draw a graphics box, 
then select a different tool to activate the box to 
receive the graphics. I would have to agree that 
StandingOut is not as simple as PowerPoint but on 
the other hand, it's a great deal more powerful so. 
pay your money and make your choice. 



Does StandingOut Stand Out? 

This product is an excellent performer that 
should provide all the power that most users will 
ever need in preparing visuals. It has far more 
features thatother similarprograms thatlhaoeused 
yet is priced quite competitively when compared 
with other top-end desktop presentation programs. 
If you already use ReadySetGo, and need a desktop 
presentation program, then I recommend you give 
special consideration to StandingOut since you wtll 
have already mastered 70% of its features. Is 
StandingOut the program for you? I can't answer 
that for you but I can say that this package does 
what it is advertised to do and represents a solid 
value. 
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C'ing Logic 



By: J.A.Woodward 

556 W. Main SL 

Lock Haven, PA 17745 

717 748 8837 



This aniclc will attempt to explain proposiiional logic and 
discuss the accompanying program which produces Truth 
Tables as they appear in most elementary logic texts. Program- 
mers need to know a little formal logic, as it is used in almost 
every program written. 

We will take as undefined terms the following: 2t2r2u2e 
and 2f2a212s2c A statement is defined as a declarative sentence 
which is either Hue or false, but not both. A statement variable 
is a symbol thai represents the truth value of a statement The 
program allows the use of the letters p, q, r, and s as statement 
variables, so in this article I shall use only these letters to 
represent statement vaiiables. 

The following examples are statements: 

1) 1+1=2 

2) George Washington was a president of the U.S.A.. 

3) Everyone hates mathematics. 

4) Tennessee is larger than Texas. 

The following examples arc not statements: 

5) George Washington was a good president. 

6) Why am I reading this? 

7) Counuy music is better than heavy metal. 

8) 2+x=5 

1) and 2) are under normal circumstances considered true 
statements while 3) and 4) are considered false statements. I like 
mathematics and this fact is sufficient to make 3) false. 5) and 
7) are not statements because they lepresent opinions, not facts. 
6) is an interrogative sentence, not a declarative sentence and 8) 
has an unknown. Sentences as 8) are the basis for Predicate 
logic, another type of logic. 



Some statements are called compound statements, this 
means that they contain at least one connective. There are two 
types of connectives.unary and binary. We shall discuss one 
unary connective, called negation (not), and four binary 
connectives, called conjunction (and), disjunction (or), condi- 
tional (if,... then), and biconditional (...if and only if...). The 
word or words in the parentheses are the common everyday 
words usually used as connectives. The word, iff (some authors 
use ifO), is usually used as a shortened form of ...if and only if... 
. A statement that contains no connective is called atomic. Some 
examples of compound statements are: 

9) 1+1=2 or the moon is made of blue cheese. 

10) If 2+3=6, then 2+2=4. 

1 1) Ronald Reagan is not the President of the U.S.A. . 

If the above are statements, then they must be either true 
or false. How does one decide the truthfulness of a compound 
statement? The answer to that question is: by definitions. A 
statement variable is a symbol which represents true (1) or false 
(F). Tiue or false are called values. We shall use the symbols 
&,V;>. and = to represent the binary connectives conjunction, 
disjunction, conditional, and biconditional respectively. The 
symbol, ~, is used to represent negation. Each compound 
statement can be symbolized by using statement variables to 
represent the atomic statements, and ~,=,>,V, and & to repre- 
sent the connectives. Some examples of symbolizatton areas 
follows. l«t p represent: 1+1=2. and q represent: The moon is 
made of blue cheese., then statement 9) above is symbolized by: 
pVq. Statement 10) could be symbolized as follows: let s 
represent: 2+3=6 and r represent: 2+2=4, then statement 10) is 
symbolized by: s>r . Statement 11) can be symbolized by; ~q 
where q represents the atomic statement: Ronald Reagan is the 
president of the U.S.A. . An easy way to define the 

connectives is by using tables (ones with no legs). The follow- 
ing table defines the connective &: 

S | T F 

T I T F 
F | F F 
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Since the symbol, =, is used to represent the connective 
biconditional, I shall use 2= to represent the equals concept. 
With that in mind, the connective conjunction {&.) could also be 
defined by the following equations: 

i> t s T 2- T 

2) T S F 2- F 

3) F S T 2- F 

4) F & F 2- F 



The connective biconditional can be defined by the 
following table: 

- I T F 

T I T F 

F I F T 

or by the following equations: 



This means that a compound statement which is the conjunc- 
tion of two statements (called arguments) is true when and only 
when both arguments are true. The connective 

disjunction is defined by the following table: 

V I T F 

T | T T 
F | T F 

or by the following equations: 



1) 


T V T 2- T 


2) 


T V F 2- T 


3) 


F V T 2- T 


4) 


F V F 2- F 



This means a compound statement, which is the disjunc- 
tion of two arguments, is false when and only when both 
aiguments are false. It should be noted that this definition is 
sometimes called the 'inclusive or'. In real life we use the 
concept 'or' in both Ihe inclusive and the exclusive sense, and 
assume that it is clear what is meant. The connective 

conditional is defined by ihe following table: 

> I T F 



1) T - T 2- T 

2) T » F 2- F 

3) F - T 2- F 

4) F - F 2- T 

This means that a biconditional statement is true when and only 
when its arguments have the same tiuih value. 

The unary connective negation can be defined by the 
equations: 

-T 2- F 
-F 2- T 

A symbolization of 10) above is p > q where p represents: 
2+3=6 and q represents: 2+2=4. A tiulh table analysis of Ihe 
statement formula is: 



P q I P > q 



caae 
case 
caae 
caae 



T T 

T F 

F T 

F F 



| T«T*T 

I T*F*F 

| F*T*T 

I F*T*F 



The *'s are used to enclose the 'answer' column. 



T 
F 



T F 
T T 



or by the following equations: 



1) 


T > T 2- T 


2) 


T > F 2- F 


3) 


F > T 2- T 


4) 


F > F 2- T 



This means lhat a compound slatement, which is a 
conditional, is false when and only when the left argument is 
Hue and therightargument is false. In a conditional slatement 
the left argument is often called the antecedent and the right 
argument, the consequent.This is difficult for most people to 
grasp, but in everyday speech, one noimally docs not use a false 
antecedent. Compound statement 10) above is an example of a 
conditional statement where the antecedent is false and the 
consequent is true, ihus by the definition of the conditional 
connective, the statement 10): If 2+3=6, then 2+2=4, is an 
example of a true statement (F > T 2= T). 



Now statement 10) would be a case 3 situation, hence is 
considered a true statement. Yes. we just said lhat ihe com- 
pound statement, If 2+3=6, Ihen 2+2=4 , is a true statement. 

Now I shall discuss ihe progiam. Statement letters are 
restiicted to p.q.r. and s, and the connectives: negation, conjunc- 
tion, disjunction, conditional, and biconditional are represented 
by the symbols: ~,A,V,>, and =, respectively. There are two 
parts to the troth tables generated. Ihe first pan is what I call 
the header and always consists of three lines. The second leader 
line starts with an alphabetical listing of the statement letters 
used in the formula, followed by the formula iiself.The first 
header line indicates the order the operations were performed in 
generating a truth table for the given formula, and the third 
header line is just a separator line consisting of numerous - 
characters. The second pait of the truth table I call the body. 
The body consists of 2An lines, wheie n is the number of 
distinct statement letters used inthefoimula. The foimulas 
allowed by this program must contain at least 1 statement letter, 
and can conlain at most 4 distinct statement letters, therefore the 
body of a truth table generated by this progiam contains 2,4,8, 
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or 16 lines. Let's look at the truth table generated by the 
program for the formula: p>(~q&p) . This formula contains 2 
distinct statement letters, therefore its truth table body consists 
of 4 lines. 1 be truth table is: 

3 10 2 

p q I (p > (- q « p) ) 



T T I T*F* F T F T 

T F I T*T* T F T T 

F T | F*T* F T F F 

F F | F*T* T F F F 

Ihe 3 lines below are the header. The header always consists of 
3 lines. 



hi: 
h2: 
h3: 



p q 



3 
(P > 



2 

- q S p) ) 



Ihe 4 lines below are the body of the buth tabic. The number of 
lines in the body is always a power of 2. 

case 1: T T | T*F* F T F T 

case 2: T F | T*T* T F T T 

case 3: F T | F*T* F T F F 

case 4: F F | F*T* T F F F 

Case 1 represents the formula when both p and q have T 
as their value. Case 2 represents the formula when p has the 
value T and q has the value F, etc. . 

Ihe numbers in header line hi represent the order the 
operations are performed. Zeros appear above the statement 
letters. In the above example the values in the body of the truth 
table were calculated as follows: first the value under - is 
calculated from the column under the q just to the right of -, 
secondly the A value is calculated by using the value under the 
- and die column under the p just to die right of the & symbol, 
and thirdly the value under the > is calculated using die value 
under the p to the left and the value under the & to the right. 

Two statement formulas are said to be logically equivalent 
if the biconditional between them is always true, Ihe following 
two formulas are quite often used in programming: 1) pVq and 
2) ~(~p&~q) and the biconditional between them produces a 
tnith table with all true values in the 'answer' column, thus 
indicating that these two formulas are logically equivalent. 



Ihe order that the operations are performed when no 
parcndicscs exist is: -, &. V , >, and = . All ~'s are calculated 
before any A's. all A's are calculated before any V'setc. .The 
program scans left to right and as soon as an operation is 
calculated, the scan starts again from the left starting place. Ibis 
process continues until no operations are left uncalculated. If a 
formula has parentheses, then the program finds the leftmost 
subfonnula containing no parentheses, evaluates it, removes the 
parentheses enclosing this subformula and then restarts. The 
program is finished when no parentheses exist. Ibis works 
because the program encloses the formula that has been entered, 
in parentheses. A negation of a negation works a little differ- 
ently because negation is a unary opeiator. Below is the truth 
table for ( — pV-q)= — (-p>-q). Sec if you follow the order the 
operations were performed. Ihe numbers 10, 1 1, 12,... , when 
necessary, are represented by A, B, C... in header line I. The 
biconditional (=) below is the tenth and last operation per- 
formed. 



2 1 
P q I (<- 



4 3 A 9 8 
- p V - q) - - 



5 7 6 

• (~ P > - q)) 



T T | 

T F | 

F T | 

F F | 



T F T T F T 

T F T T T F 

F T F F F T 

F T F T T F 



*T*T F F T T F T 

*T*T F F T T T F 

*T*F T T F F F T 

*T*T F T F T T F 



Ibis article is by no means the last word on prepositional 
logic. It, hopefully, will help some people and also the program 
will allow one to investigate the cases of a formula. 

It should be noted that the if..., then... built into most 
computer languages is NOT a logical connective. The logical 
connectives built into the Microware C Language are !, &&, II 
and =. They represent negation, conjunction, disjunction, and 
biconditional respectively. 

P.S. In November 1988, 1 compiled this program using 
Turbo C with the indicated changes. Also since I'm going to 
Poland for four months, starting February 1989, 1 added the 
Polish notation routine. Polish notation is used to indicate an 
expression without the use of parentheses. Some calculators 
have reverse Polish notation capabilities. 

I hope you have fun with the program. 



-t-t-+ 



10 6 
p q I ( (P V q> 



5 2 4 3 
■ <- (- p t - q>>> 



T T I T T T *T* T F T F F T 

IF | TTF*T*T FTFTF 

F T | F T T *T* T T F F F T 

FF| FFF*T*F TFTTF 
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Mao*: logic 

Data: 8B/3/2B 

Update; 88/11/7 

Author: J. A. (Jin) Woodward 

compiling: logic. c 

Conpllar: Mlcroware C compiler 



Function: Thla prograa la an educational cool designed to 
halp on* laarn about tha construction of truth tablaa. 



/• for Turbo c do a global replace: Index •/ 

/• with: atrchr •/ 

/• global raplaca: putchar ( *\xc' ) •/ 

/• with: clrserl) •/ 

♦Include <«tdlo.h> 

/• IBKpc (with Turbo C Conpllar) add: (Include <conlo.h> •/ 
•daflna COL 13 

/* IBMpc (with Turbo C Compilar) fdeflne COL 1C •/ 
char oporder [80| ; /* haadar llnal string • / 
char polish [SO]; 
char 'Index (); 
lnt order, polk; 



/* operation order Indicator 



naln(argc) 

lnt argc; 

I 

char expr[65|,c,ch; 



exprl) :-loglcal expreaaion string •/ 



escape ; 

putchar ( »\«e* ) ; /• Turbo c clrserl) •/ 
If largo 1) 
escape (); 
while 11) I 
c-'s'j 

while (-l--getexpr(expr) ); 
lf(-ll-prteval (expr.c)) I; 

print f("\n\nWould you like to save a copy of tha above? <y , n> "); 
c-'n'; 

while [(ch-gatchar() \ ! -COL) 
c-ch; 
putchar ('\xc'>; /• Turbo C clrserl) •/ 
prtaval lexpr, e) ; 
1 
1 
> 

getespr(s) 
char all; 

I 

lnt len, 1. ); 

for (1-1;1<«5;1++) 
slH-'VO 1 ; 



s[OI-' (%• 

while (1— strlenle)) ( 

prlntf (~\n\nEnter the logic expression, please. \n~); 
gets (tell Ml 
) 
If (lndex|s.'7')> 

escape (I t 
strcst (s,"l ") ; /* conplate encloalng logical atrlng In parentheses'/ 
If istreapls.'lss)")— 0) 

esit(0); 
for (l-0,len-0;s|lll-'\0';l++) 
If H11II-' ') 
s(len+*|-slll; 
s|len)-'\0'; 
lf (3>len) 

return (-1); 
for (1-1, j-0;Klen-l;l+'l .; /• see If parentheses are balanced ■/ 
if ('<— sill) 

1**S 
if (')'--s(ll) 

i-l 
if (1<0> 
return (error (s, 1, 1) ) ; 
1 
if (64<len) 

return (error (s.0,63)); 
lf (0<3) 

return (error (s,l, 1) ) ; 
for (i-l;i<len-l;l+«l 

switch (s(l)) ( /* syntax check on logical expreaaion string •/ 
exsa 'p' : 
caaa 'q' : 
case 'r' : 
caaa *s' : 

If (NULLI-'lndex(-pqrs)-,sEl-l)l) 

return (error (s, 3, 1-1)) ; 
If (NULL!-'lnd«x(-pQrs-C,s(>+ll)l 

return (error (a, 3,1+1) ); 
break; 
caaa 'V 
case '-': 
casa **' : 
case »>' 

If (NOLLI-'lndex(-t-V>-(-,s[l-ll ) ) 

return (error Is, 4 ■ 1-1) ) ; 
If (mjLLl-«lndex(-i-V>)-,s{l»l))) 

return(error (s, 4, 1+1) ) ; 
break; 
case '-' ; 

if (KULLl-'lndex{-)t-V>-.s[l*U)) 

return (error (s,s, 1 + 1) ) ; 
If (0>1 at NULLI -'Index (-)pqrs~,s (1-1)1 ) 

return (error (e, 5,1-1)1 ; 
break ; 
case ' (': 

If (NULL! -'Index |-)pqra-,s[l-l]l) 

return (error (s, 6, 1-1)) ; 
if (KULLI-'llKlexD4-V>-,j[l*l])) 
return (error (s, 6, 1 + 1) ) ; 



break; 
case *1 • : 

If (HULLI — lndaxl" (t-V>--,s[l-l) )) 

return (error (s, 7, 1-1 J I ; 
if (HULL! -'index (' (pqrs--,i[l*l) I ) 

return (error (s, 7, 1*1! ) ; 
break; 
default: 

return (error (3,8,11); 
] 
return (01; /■ logical expression is OK •/ 



1 



error Is, n, II 

char •«; 

lnt n,l; 

[ 

lnt ); 

putchar(nxc') ; /■ Turbo C clrscrl) •/ 

prlntf ("If you don't understand how this works enter a '?' when *)! 

prlntf ("\nproupted for in expression. \n") ; 

s[0l-' •; 

s|strlen(s)-l)-' '; 

prlntf ("\nERROR:") ; 

prlntf P\nts\n*.s); 

for (}-0;}<i;J**) 
put chart' '); 

putcharl'-') ; 
switch (n) I 



case 0: 
prlntf ( 
return < 

case 1 : 
prlntf ( 
return ( 

case 2: 
prlntf ( 
return (■ 

case 3: 
prlntf (' 
return (• 

case *: 
prlntf (' 
return (• 

case 5: 
prlntf (' 
return (< 

case E; 
prlntf (' 
return <■ 

case 7; 
prlntf (' 
return (• 

case 8: 
prlntf (' 
return I- 



AnExpression is TOO long."!; 
•II* 

AnUnbalanced parentheses!*); 

■U; 

AnBsrJ character!*); 
•1); 

\ntype: psrs*); 

in 

\ntype : i-V>-) ; 
1); 

\ntype: .-); 
1); 

\ntype: (-),- 
1); 

Vntype : ) "I ; 
1); 

Vntype: Bad character"); 
II; 



prteval (sl,c) 

char *sl,c; 

1 

int 

char 

FILE 



cases-1, pease, vars-0, 1, j,k,l«n, pgs.pol; 

var [S I, string 1 81) ,valstr(81], -p,s (66) .path [30] ; 

•fp; 



if l'i' !-c a 'y* I-c) 

return (0) ; 
If I'y'-cl { 

prlntf I'VnEnter path to file, please. ") ; 
gets (path) ; 
fp-fopen(path,*a") ; 
pute t"\n' ,fp) ; 
J 
else 

fp-stdout; 
put char I'Vxc") ; /' Turbo C clrscrl) •/ 
strcpy ( var, *pqrs* | ; 
strcpy (s,sl) ; 
for (1-0;1<7»;1**) /• Initialize header llnel •/ 

opordertll -' *; 
oporder |79|-* \0'; 

order-1; /• lnltlaliie order indicator '/ 

k-0; 
for (}-0;}<4;}**) 

for (l-l;s(l)l-'\0' ;l**l 
If (s[i)— vart})) 1 
varlk**)-varn) ; 
break; 
I 
var[k]-'\(J'; 

vars-strlen (var) ; /" count number of distinct varibles used •/ 
for U-0;Kvars; !♦♦) < /* calculate the number of cases needed •/ 
cases"-2; 

strlng[2*l]-var[l); /• making header line2 •/ 
strlng[2-l*l)-* •; 
I 

strlng[2*vars) -' I' ; 
string[2*vars*ll-' '; 
}-2*vars*2; 
for (1-O;s|l))-*\0';1**) 

if (NULLJ--lndex("i-V>-, stl))l ) 

/■ put spaces around binary operations •/ 
string!}**)-' •; 
string()**]-s*l); 
strlngtj**)-' "; 
I 

else If l'-'--s'lll ( /• put space to right of - •/ 
string!}**)-'-'; 
string!}**]-* '; 
1 
else 

strlng[}**]-s|ll; 
strlng(5)-'\0'; /• string!] Is now header llne2 •/ 
len-j; 
if (79<len) 



s 

r 

§ 



return (error (etr lng, 0,790 ; 
for U-a;l<caeee;l**) I /■ making case strings <valstr[() •/ 
(or {k-0;k<79;k»»> 
valatrtk]'' '; 
valatr[79J-'\0'; 
pcasa-1; 

for (1-0; )<v»ri; !♦♦) I /* calculate value* for variables '/ 
poa-2» (vara-J-1) ; 
valstr(pos|-(0--pcaee*2?'T' ;'F'J ; 
for (k-2*vara;k<?» 44 atrlng(k) !-'\0' ;k*») 
If (atrlnstk)— *strlng|pos|) 

valatr(k)-valatr[poa] ; 
else If (MOLL--* Index I'pqra -. strlnglk)) ) 
valatr(k)-atrlng(k] ; 
pcase/-2; 

valatr|2* (vara-J) -1 ] -' '; 
I 
while <lp-indes:(valatr,'> ')) I-tfULL) i 

}-p-valstr; /* locate flrat right parenthesla and lta mate •/ 
for (poa-j-l;valetr [poa] I"' C;poa-> 

1 
while (-1 — blcop(valatr,poa, j,l) ) ; 

/• calculate the caae string */ 
valstrtposl -valatr HI-' *; 

/■ replace parentheaas with spaces */ 
) 
for (k-pos;k<l;k»f) 

If Ivalatrlkl — 'I' II valatr[k|--'F') t 
pol-k; 

valetr[k-ll-valetr|k*l)-'"'; /• place "a around answer */ 
break; 
I 
lor (k-poa;k<len;k»») 

If Ivalstrlkl— 't' II valetrlk] — 'f') 

valatr[k]-(valatr(kl — 't'?'T':'F'J ; /• recapitalize •/ 
valatr(len)-'\0'; 
If (0—1) I 

for (k-2* vara* J; at ring I k) !»*\0';k+*) 
if (NULLt-*lndeK(var,atrlng|k])) 
oporder [k] -*0* ; 
oporder [len]-'\0" ; 

fprlntf [fp,"\n»e", oporder); /• print header '/ 
fprlntf (fp, "\n»a\n", string) ; 
for (k-0;k<len;k»») 
putcl '-'.fp); 
I 

fprlntf(fp,-\nla',valatr) ; /• print caae •/ 
1 

polk-0; 

polnotn (at ring, poa. len-1, poll ." 

fprlntf (fp,"\n\n%a In Polish notation la;\n 4s', a, polish) ; 
If (fpl-atdout) I 
fprlntf (fp,"\n-) ; 
fclose(fp); 
) 
return (0) ; 



not (s,pos, len.kaae) 



chsr *i; 

lnt poa, len,kase; 

1 

lnt 1-0, J; 

for (l-poa;a|l] !-'-' <i Klen;l«-f) 

I 
If (1 — len) 

return (0) ; 
for (J-l»l;J<len;j»+) | 
If ( '- — sill) 

1-1; 
else If 1st)] — 'T' II sill— T») ( 
a[l)-(a[ll — T»?'F's'f); 

s[l| -tolower (s[U); /• make used value lower k •/ 
If (0— kaae) I 

If (order<10) /' used for operation order value ■/ 

oporder! i]-'0'*order**; 
elae 

oporder[ll-'A'-10*order**; 
J 

return (-1) ; 
I 
I 
return (0) ; 
1 

blcop|a,poa,len,kaae) 

char «#.• 

lnt poa, len, kaae; 

I 

lnt h,l,l,k; 

static char op(]-'4V>-*; 

while (-l--not (a,pos,len,kaae) ) ; 
for (h-0;h<4;ht«) ( 

for (l-pos;slll :-op[h] 44 l<len;l**) 

I 

If (l--len ) 

If (3~h) 

return (0); 
elae 

continue; 
k-)*l; 
while (a[k)!-'T' a* «[k)!-'F') 

k**: 
1-1-1; 

whlle <s|l]t-'T' 44 a(l)l-'F') 
1-; 
If (J--h)l 

a(l]-(a|l]--a|k]?'T':'F'],- 
I 
elae If 12— h) I 

i[)]-lill|-'r (4 e|k]"'F'2'F':'T'|; 
> 
else If (1— h) I 

a[Jl-Ia(ll~'T' || a|k]—'T'?'T':'F'); 
) 
elae if 10— h) < 



»[}]-(»(ll— T II ilk] — T'Tt'-.'T): 

i|ll-tolower(i(l]); 
slkl-tolower(slk)) ; 
If (0--ksse> { 
If (orderOO) 

oporder! jl-'O'^order**; 
•lia 

oporderl Jl-'A'-10*order**,- 
1 
r«tum (-1) ; 



) 



polnotn (»t , lft , rght ,pol) 

char it | 1 ; 

lnt lft, rght, pal; 

( 

char lp,rp; 

lnt 1,J; 



pollsh(pol)tt*]-st [pol] ; 
If (l--polk it '0' --oporder (poll) t 
pollsh(polk)--\0-.- 
return 10) ; 
1 

lp-rp-'O'; 
If (itlpoll— '-') | 

for (i-pol*l, j-l;l<rght ;1**> 

/* find the largest oporder to the right •/ 
If (ip<-oporder[ll) { 
rp-oporderll); 
1-1; 
I 
If ( ipl-'O') 

polnotn(it,pol»l,rght, j) ; 
else ( 

polllh(polk**)-at[ j); 
pollsh|polk]-'\0-,- 
I 
I 
• laa ( 

for ll-lft, 3-l;l<pol;l*»] /* find the largest oporder to the left •/ 
If (oporder(ll>-lp) { 
lp-oporder(l|; 

l-i; 

I 
If l*0'!-lp) 

polnotn let, lft,pol-l, j) ; 
•lie 

pollsh(polk+»l-st(l); 
for (1-pol+l. j-l»l<rght;l**> 

/* find the largest oporder to the right •/ 
If (oporder [l]>-rp> { 
rp-opordertl); 
1-1; 
t 
If (*o'l-rp) 



polnotnlst . pol»l, rght , j) ; 
else I 

polish (polk++]-st(ll; 

pollshlpolkl-'XO'; 
] 
I 
I 

escaped 
[ 

prlntf CVnOsige: This program generates truth tables. \n*); 
prlntf (• You siay uae only the letters: *p' , "q" , *r' , or'i' 

prlntfl* a stateaent variables.*) ; 
prlntf (*\n The connectives are synbollted as follows:*); 



prlntf (*\n 

prlntf ("Vn 

prlntf CVn 

prlntf (*\n 

prlntf (*\n 

prlntf (-Vn&xamp lei 

prlntf (~\n£xample2 

prlntf ("\nExample3 

prlntf (*\nExanple4 

prlntf C*\nTo leave the program 

prlntfl* for an expression.*]; 

prlntf CVnThls Program was written by: 

prlntf ("\nPRESS ENTER to continue."); 

getchsr ; 

I 



echo 'logic. c' 



Biconditional Is •-' (If snd only If)*); 

Condltlonsl Is *>' (If ,then )*); 

Conjunction Is '(' (and)~); 

Dls junction Is 'V (or)-); 

Negation Is »-• (not)*); 

p>(qVr) would be read \*If 

p( (qVr) would be read \"p, 

(ptq)Vr would be read \*p and q, or r\*"|; 

p— q would be read \*p If and only If not q\**) ; 

enter the string 'ft-' when prompted*) ; 



p, then q or r\* 
and q or r\"*l; 



'); 



Jim woodward. Lock Haven, PA 17745") J 



echo c.prep: 

c.PREP logic. c >ctmp.4.m 

x 

echo c.passl: 

C.PASSl ctmp.4.m -o-ctmp.4.1 

del ctmp.4.m 

echo c.pass2: 

C.PASS2 ctmp.4.i -o-ct«p.4.a 

del ccmp.4.1 

echo c.opt: 

COPT ctap.4.a cUp.4.o 

del ctmp .4.1 

echo rma: 

RHA ctmp.4.o -o-ctmp.4.r 
del ctmp.4.o 
echo rllnk: 

RLINK /rO/llb/cstsrt.r ctap.4.r -o-loglc.bln -l-/rO/llb/cllb.l 
del ctmp.4.r 
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Ann Introduces High Performance 68020-Bnsrd System 

Multiprocessor System Delivers JO MIPS PerfarnvKare 
Sysicm Uses Uplo 84 Ma>totnla Processus foe Central. Penphenil Fuoctioiis 



SAN JOSE. Calif.. Jan. 24. 1989 Am Corp. today introduced ■ sencs of high- 
perfoTrnaivebu&inc^ computers based on multiple Motorola 6S0P0 family processors. 
Arm's new SysiemvOwties uses up tociglii 25 MHr 68020(020) processors to deliver JO 
MIPS CmUlioninsinictions per second) of performance In total, ihe computer uses up to 84 
68000 family chips to control central processing, inpultoutpul <l/0) and disk control 
functions 

SystcmW conf is utaiions use ihe Unia*> operating systc m and can support from 32 to 
512 users. Anx'ancw mp of-ihe-line Model 80 uses eight 1120s forcenirel processing 
functions, sixty 020s for !/• control and sixteen 6#fKWH for disk controt The combined 
processing potter of these eighiyfotir Motorola chips is over 200 MIPS. 

"Ibcnew Art* systems show ihe versatility and pncc-peiformance of our 6800O family 
of processors." said Muriay A. Goldman, senior vice president and general manager of 
Motorola's Microprocessor Products Group (Austin. T»as) "The flexibility of ihe 68000 
line has made it a dominant engine in both the emhosded control and central processing 
mantels." 

The 680(10 line currently tat four mrcrofirmeMor members ihe (swKKr.r.xoio. 
68020 and 680JO TV current devdopmem of lite ncxi gcnerunoti toaUOconiinues ihe 
evolution of the process** family lnioul.2l mtlliun chips f ic ,m ihe 68000 family have 
been sold in applications including supercomputer*, high-end workstations, business 
computers and embedded coutrul devices. All generations of ihe 68000 air: conipailtli: 
with each other, Software wrmen for one chip runs v/nh no modification on ihcoihcfs, 
and lurdwa/e upgrades are very simple, 

Aria Coip. (San Jose. Calif.) designs, manufsciurcs and markets high-peifomiancc, 
Unix-based mulupmreisor compurcr systems. Ana distributes its systems almost 
exclusively through domestic and imeraatiutul reseller channels, including original 
cquiptneni manufaciuiers. value added resellers and systems integrators. Ana common 
stock Is Haded on else NASDAQ Manorial Market Systems under the symbol AKIX. 

MOTOROLA OFFERS USER'S MANUALS FOR 88000 RISC PROCESSORS 



AUSTIN. Texas. Jan., 18, 1989 — Motorola's Microprocessor Products Group 
today announced tltc availability of iwo user's manuals Tor its 88000 RISC (reduced 
irisonCTU>n ki computer) mlcioprocessor family. This announcement closely follows lasi 
week's news of Motorola's 88000 being available for general sampling. 

The new user's manuals provide detailed technical informadon on Motorola's 88100 
centra) proaessing unit (CPU) and 88200 caehejmrrnnry management unit (CMMU). 
System designers and software developers will reference the manuals for explanations of 
the addressing modes and insoviciion scat, analyses of bus operations and register usage, 
data on electrics I charac tens tics and outlines of mil ihnum sysr m con figuaiions . 



MOTOROLA BEGINS GENERAL SAMPLING 
•F S8000 RISC MICROPROCESSOR FAMILY 

Volume Production to Begin in Second Quarter 

AUSTIN. Texas. Jan. 10, 1989 — Motorola's Microprocessor Ptoducts Group today 
announced thai its new family of high-performance RISC (reduced instruction set 
computer) microprocessors, the 88000. is available for general sampling. MotoraU 
also reports that the product will enter full production in the second quarter of 1989 

Today's euwounccrnenl of general sampling brings the vety high perfcamasic e 
of die 88000 mK coprocessor architecture to the general marketplace. More than fifty 
customers have received product samples since tally 1988. These customers worked 
closely with Motorola to evaluate and rrmurorc the processor's func tonality and 
performance. MolOrOl a is now a— e ating orders for general dehvtry 

"Thc880O0 is designed to integrate the features required by computer makers 
on silicon io reduce system design time and cost while markedly increasing 
performance." said Murray A. Goldman, senior vice president and geneial manager of 
Motorola's Microprocessor Products Group. "Our manufacturing strength has allowed 
us to create the most complete and aggressive miCniproTtsscir implementation ever 
offered to computer manufacturers." 

The 88000 family includes two chips. The 8810(1 central processing unit 
iniegr ales integer aod Hosting point capabilities. The 88200 Cache/Memory 
Management Unit (CMMU) provides a complete, single-chip solution to c*che memory 
design, an essential function in RISC computer systems Togcihcr the Iwo chips 
piovidc functions equivalent to 50 or more ctrmponents in competing systems. 

Sample quanrines of Ok 88 100 cenrnl process! ngunii are available for $494 
The 88200 is available ai So 19. Inquiries should be dire tied to local Motorola sales 
offices. Full production will begin in the second quarter 

86000 BLOCK DIAGRAM 
68100 Microprocessor 
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GEnfRflL m.CRO SYSTEiTlS 



Kicronlca Rearerch Corp., 

333*3 Lynn Avenue, 

Abootaford, »c., 

CANADA V2« 112 

13 Jan l»i» 



INCO»fOi»'IO 



For further Information: 
Scott Bowman (714X15-5*75 

wrens r»n nun 

FOB IHHTlHt SYSTCHS 

Montclalr, Calif., February 3, 1969 -- A VMEbus CPU 
card that includes a realtime kernel for multi-tasking 
applications, simplified runtime development of applications 
and debugging, is now available from General Micro Systems 
Inc. 

The CHS V17 is a 32-bit board based on the 33 MH2 66030 
device, with a 66892 co-processor, up to 1 Mbyte of SRAM, up 
to 256 Kbyte of EPROrl, two multiprotocol serial ports and a 
configuration controller with timers. By using one of the 
available PROM sockets for a VMEPROK 1 " a complete runtime 
package la added, essentially providing a complete realtime 
system on a aingle board. 

The VKEPP.OH allows the user to write application 
software, debug the board, take code and download it onto 
the board. Practically, it allows the user to get his 
oroduct up and running without having to Invest In a major 
disk-based system. 

When uaed for teatlng boards, It allows the user to 
exerciae them completely and even check all the drivers. It 
allows evaluation of boards, supports the trying of 
different CPUs and comparing benchmarks. 

The VKEPROM resident on the CMS V17 includes a POOS 3.3 
kernel, file manager, monitor, debugger, full-screen editor, 
S-record uploading capability and RAH/ROM DOS support. 

Designed for multiprocessing applications, the GMS V17 
features location monitor/mailbox Interrupt techniques to 
support realtime processing. It can both originate and 
aerviae interrupts on the VHEbus. A unique Bus Master Boot 
requires only one boot PROM for an entire system. 

The CPU board also can accept a family of SAM™ (Special 
Application Module) carda. These allow the same card to be 
customixed with the addition of a second VSB bus, additional 
intelligent serial channels, buffered I/O for high speed 
data transfers, and extensive direct-access DRAM or SRAM. 
With a SAM in place, the combined board set requires only a 
single slot in a VME card cage. 

The GMS vl7 with VMEPROK is OEM priced at $1813.00 and 
carrlea a two-year warranty on parts and labor. It is double 
Eurocard sire, 9.2 x 6.3 inches (234mm x 160 an), and is 
available for extended temperature applications. 

VKEPROM ia a product of Eyring Research, located In 
Provo, Utah, telephone (801)375-2434. 

General Micro Systems, located at 4740 Brooks St., 
Montclalr, Ca 91763, telephone (714)625-5475, FAX 714-621- 
4400, has been providing reliable, high performance, 
designed and manufactured in the 05A, microcomputer modulea 
since 1978 and offers a full line of modules to VMEbus 
apeciflcationa. 



Dear Oon, 

Juat a gulckle note to let pg know tbat Diagram 95 is alaaing 
from page 37 of the Jan II 'Logically Speaking*, ay fault 
entirely, aa I faigot to pat an leettoctloo to insert it between 
tba two paragrapba beginning 'Deaiga a prototype ...' aad "tula 
looka latereatlag ... . maybe you could reproduce it aeon for 
tba benefit of readara following my aerlaa, Tbenkal 

Salaa of KBASIC (both (or tba 6109 aad the 680OO ptHI) are 
moving well, and, wltb your permission, I'm encloalng a photocopy 
of your Eubacrlptloo Application rore, elth eecb UAcic a»ld, 
together wltb a recewasndatloe to aubacribe. lope yoe'te 
agreeable to my photocopying. 

Whan I have time I'll write e bit more on XSASIC irLABATIOwC. but 
right now I'm up to my aera in year-end atuff, eucb ae yearly 
Financial atateaenta. Income tea, and all aorta of other horrible 

atuff. 

Don wlkllua, 

61 micro Journal, 

J900 Caaaandra tilth Road, 

Uliaon, n J734J 



Sincerely, 



At 
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U (W0« W* CR»Vt A*IR fcU0>*3? m IMBI *7?M»i fhXWttiTfl Vl* 



OATfc 

CONTACT: 
TEL 



FEBRUARY I. W9 
MARIE HARRIS 
1301) 1 72- 3991 



FOR IMMEDIATE R£I_£aSE 



THREE NEW PATTERN RECOGNtDON SYSTEMS 1NTXOWCTO BY C*tS 

OtttpwCtr RKCjJA.uoo S,UfT» loc of A y»t, M A . 0« cf ifw *r>W » iadifl. **fx0w*i. of m»<rhifM 
vitjofl system hat Btuaoaacwd threw ut taarscft. of >o jaduiiry p*tr*«* TRACKER porters 
■ lyiliaa. 



The ctpuxtma laseof TRACKER prodtKO «J»N«*»e* ■ breaklbrouth in twice/ per fcrmi»<» aoo«| 
ttfiM tyiienn which eACCatc the cntttaJ tJfcjameol and vmtaasueamt wmttom to K" ntnttf-Ktort 
TRACKER 'iot-ia. BPdiUlr •rcWtector* mn h;|Vjpc«3, tLtotfWx/T based .bjcviUiau ot> the CR5 
IMAGEbin Tbil tJtow. itvt u w r l» eipaod lysvn fun 



TRACKER I ■ llMAGEbus only) U »wpti. cRpsudsble. ud live* the arap-TK nua* 
Of hilbUMtd IMACEbwl options far user who do twt twed the e*P*&dab ilitjr of ■ full VME bus 
t-Kkpiis-s, It it tvtJlabk is eotwui 3X3 packUm.. 

TRACKER VJ - (VMEbui and IMAGEbua) provide* |he widttl r»a*« of 'u&aiofti, 
CiCNndabiUty and PfrfOTOiaace of liy Oenenireci^BitMn product evaiUble. Mibji miritiM control 
tod iawctWn optica. MJt pottible ihrough tfrt vM or m&i VME ead IMAGEbut .lots, 11 u 
tvailible in *U p-vckiiioi 

TRACKER V - (VMEbus oalyj it » low cost, fully compatible VME board set which 
implements the urn* robuii pattern recoeaitioa algorithms used throualujui ihe product libe an in 
cciiiing VMEbus lyilem, 

TRACKER it itfed 10 miuurt crilicil dimension! of lemieonduclor wafers, check lane widths Or 
overlay rviuirttmon;, perform paiitm ricotriition Tor mochiM opcraiioni ictch u ProOt |Wtdl*K4, 
Hvbr id «j rCgl t lu«t tr ifMH|0g. memory ™PJif or luiomeied wire pull testing. All or* ihc TRACKER 
PfodwCD P*Ov*de |ht fDUotv'n i idvtAC emena: 

«The use or Edj* Corrcliitos t«<hn»qu« which nukes Iheiyitum ejureaily loleani to low- 
coftiriil JBd blurred p*Uerru. 

Opts tytlem »rchiL*ciu*i wbJCh «CC«pt» * wirier* of hardwire modulo for lyaMm 
rxpaaiipn or future uptradmf- 

LoC*U (Autliple 0*>iectj or f«itum wrtbia lb* hk sevek erea 

o Out* co«P*t«ioo KCAa-aue* whrdi speed up osodc* dowoic*J io* fro* host axgpw* r. 

The TRACKER fimily provide. S12 > SI2 piMl moluuoa. 256 kv«] of |r»y>c»k ptWisuii. 
iwbpiMl nioiutioo which »llo»i Ihr «yu»tB to|u»rutf« bantmoa to 1 P»rt ut 2D0D, and ptTDCCBiOdi 
linte* (iMluduil irivir icQuailMit) voder lf>0 on Hicini foe tie TRACKER f ■■ily of pttttfB 
ir^oinitftMi lyteow ,«j> b . fiotn 51.000 to 12 J. 000 

TRACKER oOows Ihc «Mf » utH^vde aod » add «cw fufictid-H » they in ondML Tab a (be 
kind Of rttilbUHr that OEMs been loot i if for from raachsoe *on» doclopen* sulci F Patrick 
Murphy. r>*i»d**>( of CR5, lac Tr-nr acw prodvco arr joat Uw heemaini «f our cipended 
offering ut ihia area.* 

Estabrithad La 1911. CRS b oo* of the mmt tommcnaHty saccnful tnachioe vsnat iyiteB 
jnaaufadaremn the world* havtnt developtd and la-tirated buOiLrcds of Dtitm into roan ufact mini 
Jihei uOiilM) Ihe ItObt. The eomcamy't <wctvu it based oo engsatMnns tAcelteacc aad the cajefoJ 
M-tCUOa of veaafor the tPf4<C*li00 «f rt> techaoJwjy. 

For more ioformiiion. coabKt Computer Recoinhion Syn*™*, lac., ai II Ofwft Park CM**. Ayer. 
MA ON):. tet1MII?72099l 
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20-alot dotLbla-heig.it vvxbaa baokpiaoa 

oat* aoata, improvaa performano* of 32-blt lyitMi 

Fremont, CA -- — Dwelgnera exploiting VXEoua' potential to the 

Halt and configuring full-width 32-blt myttemi., can now mlnlmlae 
backplane coeta ualng Oaga Preclaion induatriea' new double-height 
2Q-alot V316-420. Caeplete with on-board tareinationa and quality 
gold-plated connectors, thla product coate $850 {quantity} , a 
aubatantiel reduction compared with uaing two single-height 
vera i one. 

The backplane incorporate* a number of deelgn f mat urea to optimize 
performance for thla 32-bit aector of the coeputer ayatame market, 
which ia puahing Vfdbua to ita Halt* with high data-rate*. Theae 
include a patented tracking arrangement which foree a ground loop 
between every elgnal track-thereby reducing croeetalk and 
optimizing elgnal integrity, end careful artworklng to maximize the 
aiza of the ground and voltage planaa for high power handling 
capability* 

Daga haa choean heavy-duty PCS eatarial for high rigidity, which 
obviates the need for extre supporting central cross rails in the 
ancloeure. High-precialon manufacture, ueing HC drilling 
equipment, further enauree that the PI and P2 connectors are 
cloaely in-line, minimising Insertion forces for boerda. 

High-quality Claea-2 DIN connectors fitted with gold-pleted tails 
are used on the A/B poaitione of the J2 connector. Specified for 
400 lnaartion cycles, thea connectors offer excellent reliability 
and life expectancy for a uaar'a secondary-bus I/O system. 

V316-420 net* a feat-growing demand for economy components aa 
companies sove full 32-bit VMEbue ayatems into volume production, 
and Joins Dage'a three prevloua doubla-helght product's offering 
5.-7-and 9-alota. In common with all Dege'a backplanea, V316-420 
is manufactured on a production line which routaa each unit through 
stringent ATK-beeed final teetlng before ehipment. Thia 
manufacturing process la deelgned for fast prodution of custom 
interconnection systems, and Dags ia pleased to alao offer thla 
facility for the manufacture of epecial VXEbue backplane 
arrangements. 

For further dataile pleea* contact: Joe Toata at Dage precision 
industries. Inc., 46701 rramont Boulevard, Fremont. CA 94538. 
Phone: Mis) 693-3930 



A 



UATR1M CORPORATION 



tfM N**r Hep* ftMtf ■ fleetfft. «C 278 ro . t9J9) 833-1000 



Don William* 

Southeeet Hedia-Dlv. C.P.I. 
5900 Cassandra Smith Road 
Hiaxon, TN 37343 



Dear Hr. Williams, 

Aa en OS-9 eyetejo uaer, you may be interested in 
conaiderlng Matrix aa a source for high performance VMEbue 
and economical STD bua platforms - 

Matrix offera a full line of VM£ and STD producta auch 
aa processors, memories, disk controllers, standerd I/O 
interfaces, snd snslog modules in sddition to card caqea end 
integrated ayatena. Encloaed ia a filer ahowing part of our 
VMEbue Single Height family and en art) Short Porn Cateloq. 
We elso have s growing eeries of Double Height VMS products. 
Cuatom deaigm and manufacturing aerrlcme are sleo available, 
allowing you to specify unique boord and ayatem level 
products for specialized requirements. 

Matrix is reedy with its technical end customer support 
stsffe to help you lncorporste these producta in your 
applications. If you, or your associates, would like mors 
information on our producta, return the enclosed reply card 
and we will send the appropriate information. 

Ploaae feel free to call if there are any queatlona. 



Sincerely, 




7%et 



"Xaurent nallleur 
VHJEbus Sales Manager 




Re*/ A Idem 

STD Salea Menoger 




QUADHATKON 



FOR IMMEDIATE RELEASE 



CONTACT 



ROBERT SMITH 

or KATKY BcRG 

(805 J 494- 1158 



QLADRATRON announces q.offjce* 

\KD PRODCCTIVITV SOFTWARE ON 68000 
Products Targdrd at Dtpmmmlal Computers 

New York. MY. April 18. 1988 - Quad/ation Systems Inco/poraicd IWeulikc Village. CA> 
announced today (Kit iis pickages Q-Offfce*, Q-Pltn. Q.Typesci. and Q-Chart will be avail- 
able on Motorola's new 84000 family of pfocesson. These Quidriiron product* ptovidc solu- 
lions to end user require merits fw office and producrivny tools on nigh performance personal 
workstations and were announced n Motorola's 88000 rollout in New York today. 

"Motoiala's new RISC vehitcCTure arfdieues a need in the menace Tor a single system that 
pnucuo its! oiftdania of Unix and line power of a RISC based system. This will give the cus- 
tomer the ability to gain performance while matntaisuAg current appticmaWM We are confident 
this &y*iem and QiiairaTnm't product, will address customer*' needs." According to Roben 
Smith. Oucclot of Sales, 

O- Products mining on the Motorola 88000 will uk the additional CPU (Central Accruing 
Unit) power/iefftciency to increase user throughput- Tho will iinptove pncc/petformince and 
user satisfaction. 

Availability and distribution will be announced ai a laKr due in 1984, 

Qtiadmran Systems InaorporTed. iKadquarteicd at 14] Tnwn/o Canyon Road. Westlatte Vil- 
lage. California 9l 36 1, hai been in business five years aa a privately held company. Ihe com- 
pany specialties in office automatwri wrth over 300.000 osera worldwide. AU Quadnuion's 
produco support national language version* and provide support for over 150 different com- 
puter system*. 



EKF-ELEKTKONIK-MESSTECHNIK GMBH 

Sy«ar*lx«v» fit ta uumw und lart aate C faWronK 
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Don KiJJiaa. 
•a Micro Journal 
Coavatar ?ubllablog Can tar 
5900 Caaaaodra Smith load 

nth - uim, n >7iu 



. 1a Q-470OHvwnl 
TM> IMCl Ml 

i«wuioniiii»«7 
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Tb» vmtnia ccavatlbla Micro cccputlag ualt via U0S2.HJ2 free TMZ off.ro 
«*cy powerful r#«tur«e p*klng it aultibla aa high p*rfora*nca 
ataod-alona ccMputar aa vail at eaatral procaaalag uaitt 




ita vxx *so*0-X3J eoaBlsaa both mltllar<r aj«j aur<aea awastad davicu 
ta«kiiologiM. Tha n*« to ita rallabillty, oarfemaoca and aodarata 
pricing tba board 1 ia good cholca for a «lda rasga of applleatloaa. 

for volusa appllcatloaa or low BOuotlag aoaca In targat ayataaa CUT 
offart alaller boards <alsgl* CUFOCMD alia) ablth VMH»a/Iiae lotartaca 
la ordar to balp raduca coat. 
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Unify Corporation 
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Motorola Computer Systems 

(408) 864 4480 



MOTOROLA AND UNIFY ANNOUNCE JOINT SALES/MARKETING PACT 
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New Single-Board VMEbus Computer 

Mold* Cost to Performance; 

SCSI !• Standard. Ethernet* is Optional 



Cupertino. CA January II. 1989 •- Motorola Inc.. Computer 
Systems Division, and Unify Corporation jointly announced today a 
sales and marketing agreement under wluch the companies will 
cooperate in a worldwide effort to offer Unify s products on 
Motorola s System 8000 multiuser, super microcomputers. The 
agreement also applies to Motorola s future RISC-based systems. 

Specifically the agreement provides for Motorola to receive 
early access to Unify s recently announced ACCELL/SQL and UNIFY 
2000 products in addition to foreign language translations of ACCELL 
and the UNIFY RDBMS. The agreement is structured to promote 
cooperation between the two sales forces. 

Commenting on the benefits of the agreement. David Saykally. 
Unify president and CEO. said. The power and flexibility of ACCELL 
and UNIFY coupled with the price performance of the Motorola 
System 8000 make an unbeatable combination. We are delighted at 
forming this strategic relationship with Motorola." 

Wayne Sennetl. vice president and general manager of 
Motorola s Computer Systems Division, stated, 'in keeping with our 
commitment to total customer satisfaction. Motorola is very pleased 
to offer these tools. 

UNIFY 2000 gives Motorola customers a high performance. 100 
percent uptime. DBMS for their large UNIX applications, while 
ACCELL/SQL provides a standard development technology for UNIX 
appl cations. 

ACCELL consists of a lightly integrated application generator 
and a 4CL designed to interface with popular SOL relational 
databases. UNIFY is a high performance RDBMS designed for OLTP 
database applications requiring 100 percent uptime It features five 
different data access methods, has multiple configuration options, 
and provides on-line backup and recovery as well as five-level 
security. 

Motorola s System 8000 is a UNIX-based family of multiuser 
computers for workgroups. The family models range from low-end. 
six-user members to high-end. 128» user systems. 

Unify Corporation is a leading manufacturer of UNIX based 
application development software tools Based in Sacramento, CA. 
the company employs 130 people in 13 offices across the United 
States. Europe, and Japan. 

Motorola Computer Systems Division is based in Cupertino. CA. 
and develops and markets mid-range, multiuser super 
microcomputer systems for end users and VARs With sales offices 
throughout the country and customers that include over half of the 
Fortune 1000. the division s focus is to provide total hardware and 
software systems solutions for the workgroup 



Motorola and the Motorola logo are registered trademarks of 
Motorola. Inc. 

UNIX is registered trademark of AT&tT. 

UNIFY and ACCELL are trademarks of Unify Corporation 



CAMPBELL. CA.. January 24. 19»9 — A new 32-M iffiSlul U> gW board 
computer wtfl serve a very wide wrlety of Industrial eppacark*is where uers can teira fim 
the rioln combtnettan of procnilng po#er and InputAMpul GreueMsfy Tie CFV-27 can be 
ordered to run 01 123. 167 or ZSMMi Ite I/O capnbtily Induces SCSI In addrtton to many 
serial and panslel and; Ethernet conoid is rajcunal 

The CPU-27 Ii suited for bodi raol dme and standard appOenrjora under a variety ol 
openjong, systems The board oomo equipped wtth Its own realtime heme) plus 
rnnilax/daKMjnkT for bnrntdinfa opanrtdfl 

Wayne FWhrr. ttreetor ol Maranno, raid "tha Industrial contrti anj lactay -ummavxi 
marr-eb have bam asking for a mid. range skiyla Wra J ampultr that an side up the coat. 
to-prrformaxa curve In term of speed and ftluSoro Trie CPU-?? can fee psacruaed a> 
either a trwleal 324* pa i ttJin e i . at a nairputer wtth a tny hlqh level of runrSonaltty Of to 
several poees si between * Father evAcatsyJ that indusrnal wen seeJung Ihetr ftrsl Vr*bus 
toaaon would Hod the CPO-27 'an norlentflrnmr, venaie * 

The CPU 27 empfcy. a tingle cMp tokraon id VMEbuj kthrtaor and control -Our ad 
vrra! VMEPLUS - archaecrure melon ragrvdertdry ra^sksssrevajsednc gate array arch™ J 
ogy with prariuon surface-mount board moraeiacturtno to offer mere functions In a single 
board mmputer for less dolan.' tatd fWhej 

Wide ApBllcaetoBB Range fe-eea Standard a\ Opornal Features 
A. a angle board awasuae, the CPO-27 parens a wide range of I/O on n SCSJ 
Interface Or*n that can be a msi as l sssi i aviuoV hard and Hrcppy dnve>. tape unto 
and optica) onto, among orhen A long period of cornrjot*** growth u envtrUned for 
SCSI rkvtaa 

The moo basic CPU-27 to priced as low as $4,490 but often hueum ouesaartd 
with boards crasng hundreds mew A fuly asrelgured 25 MHt CPU 27 to prianl at 
15.590 The larraV often, the fraWkrg feature* 

a 68020 32-bnrrtoeeresxaiaT. 125. 16 7 or 25 MHj nperatkav. 2 EPROM sodWs 
lor up to 2 Mbytes of norictr 

a 68482 324* Ooorma point airerjrxssor . 12 S. 16 7 or 25 MHj operation 

• I Mbyte of High speed SRAM, Oswalt states at 125 MHr, 1 wan state at 16 7 
MHl and 2 waft stales at 25 MHj 

a Rest time dock wtth on board battery backup 

a 32 Kbyle Ibigle.socan SflAM wuh battery baakup, can be used as a contest 

store that survives power failure 
a SCSI Interface (via MBS7C01 host adapter chip) 
a Opdonal Ethernet trarweMr Interlace (front pane) access) wtth 64 Kbyle otil- 

eated buffer; based on the AMD 7990 LANCE otup set 

a 3 serial I/O channels for RS2S^IS«224C48S rspenrion naahble vis 9-ptn (torn 
panel aonneriort FVst 2 ports can provide syncrvon.Mjs operatkei based on the 
68562 dual unlvana) serial ctrrranurAssriom corstrcsVr dup; 3rd port employt the 
68901 muaj-funcBon aeriphara) chip 

a 2 Parole I IrrarrtarBOenen provtrai 3g parafcrl mines .«i the P2 mu a m e that 
can be proraarnrnad for un>- or O-csvesdortal cperatlQrs; Itnar funcoons Indude 
wo 24-ba and eight 8-btl Omen 

a VME/«1/S archllrcrura eireaaSssd In PCA-0D1. a listen O40S gate array 
The) array ptovtrks EEZ 1014 v>Bxa Werfaca are) awtri runraora srdaaraj 
D&ACK gar sw a t k e i. bus error u a iv aar aa i. systrm reset, bus c'oc* and Ol On- 
board oraaao) ejoje 

a A32/2V16. 0320*16* WsQxo raaasaAhMr MBtarji 

• Slot 1 Control runcBora (SVSCUXX arbtrar. etc) 

a VHEPDOM r aa tttne fDOS aernst rrxxstsr and deburser 

CPOJ7 Sotneani Includes VMEfHOM 

tnhardn, the wehanasi of the CPU. 27 k VMtHILK a tree raai-cenr operraVsg 
tystrm latrnal that alio tnckktej a rnonkoj and debuooss It It Inssaaed In EPROK. 
thus yarlaaig orsrradonrj oaweJafy as soon as the board Is trazaltri on an acttue 

Uc«pl»* V>*yROM Is baaed on POOS, a nresuke rsprraang tyston freer, £ynno 

flosaarch Intttuts 
The CPU- 27 t> aao ua i yti e wah many rhkd-panv tsvaVenst ayssmt and harneh, 

Including UM XaxirnnfMs products Support for Elhemet's TCP/IP prosDCD) b 

ptannad 
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TeamOne Ships Engineering DBMS Software Product Line 

Santa Clara. CA. - TeunOte Syatrou announced k«U». that afltr two yc«n trf 
dMlopmiM. Ui>>Npptligilx0t>f'Ct-<>rimled.L<NI)(-b«M(Ia^r«7<hg DBMSaoftwarF 
product Una. 

TaoOra ho created a new gow»tJoti of uftwut that *owi(MwJ)r' ourwgn design 

data fUct and mfiiWTlflg <tanl0pm0lT procaaKa El' lfhtmf f annpwy ffif utm ' rum-Hf 

M jijuM Miit The initial product! art TeamOtc CM (Configuration Mwiniatl and 
TaaiDOta? Q"ery, which operate on top o* thr TaamOhe EDM (Engsuning Data 
Managrmcn o repoadBry , 

TcaOiOtat'g software is tsgrtrd for englacatag and dcvvkiptnrn t teams m the fallowing 
market* 



Engineering DBMS Software Market 





Engineering DBMS 



been Ur&Jy untapped taiUM current vendor approachs 4ft burrfowrw to thr mam, 
■nd rvnaic ttignUHant con vrrtkm and angotng support coats. 

TttfnQne Unique Solution 

(n contrast, TeainOne software operates u a logical nrtenskm to the UNIX (tie system, 
pnrvid ing tnmp*m t change control, vwn cxmtrul, rnnKguia tion mAiu gemcrtt, and 
avwaU o>£r»*exu\g data managemeu frx projrci design ilia, The key to the solution is 
th* t the users' envuisunait (user interfaces, binary fik*. jppticahons, mrthodolc-p«.etc 



Availability and Pricing 

TeaoOne software is available tiruntdiateiy on Sua workstation*, with other strategic 
plaoxmns to follow. Since the product b easy to use, and dors no* disrupt* user's current 
envinnunen t. free 30-day evaluation oyto an? available. Pridng Ls S 2.500 (rttail * 
quantity one) and will avenge boon $] AOQ to S2JXJD per user, depending on network 
configurations and volume dctuunia. 



68000 C CROSS-COMPILER 

The 68000 C cross-compiler is a reasonably complete, 
optimizing, one-pass implementation of the version of C as 
described in Ihe original Kemighan and Ritchie text, and as 
later extended. 

This C compiler produces 68000 assembler code, which is 
then processed by a 68000 assembler conforming to the 
Motorola 68000 assembler language to produce 68000 
machine language code for execution on a 68000 computer. 
Such an assembler is provided with this C compiler, 
although similar, system-specific assemblers may be 
subsiituted. 

Since both the C compiler and assembler are themselves 
written in the C language, they are boih capable of being 
ported to a number of systems. Ihe only direct system 
dependence is that Ihe provided C libiary was written for 
SK*DOS; however, ihe libraiy is necessary only for running 
the program produced, not for running the C compiler and the 
assembler. This C library may be rewritten, replaced, or 
ignored, such as if code is being generated for stand-alone 
single-board applications. 

Ihe original Kemighan and Ritchie C text, and similar 
publications, such as the second edition of this text, compiise 
the best available references for the C language as embodied 
in this compiler. See B. W. Kemighan and D. M. Ritchie, 
"The C Progiamming Language", Preniice-Hall, 1978 and 
"The C Programming Language • Second Edition", Prentice- 
Hall, 1988. 

Ihe use of Uie compiler and/or the object code produced by 
it requires the following versions of operating systems: 
MS-DOS 3.1 or greater 
SK-DOS 2.5 or greater 
UNIX BSD 4.2 or greater 
UNIX System 5.2 or greater 

The cross-compiler with printed manual is available for a 
retail price of $100. The C sources are available only by 
special arrangement. The program may be ordered from Ihe 
following address: 

Computer Systems Consultants, Inc. 
1454 Latia Lane, Conyers, GA 30207 
Telephone Number 404-483-4570/17 17 



From the February Issue page 45: 

Writing Position Independent and Reentrant Code for the MC68000 Family by Truman T. Van Sickle 

Our apologies for the omission of (he last three paragraphs to (he anicle. 

This fixed code sequence can be moved anywhere in memory and it will execute correctly. Note that Ihe table entries will be calculated al link 
time if the various procedures are in different modules. Also, it is not even necessary for the table and the executing code sequence to be in 
the same module so long as all of the necessary labels are properly defined with XREF and XDEF statements. 

The above discussion outlined transfer of program control within a position independent program when the range to the destination code 
exceeds Ihe plus or minus 32000 byte limit of the MC68000 family. A similar approach can be used to access memory values. These 
approached should be used sparingly. Ihe code sequence above replaces a simple BSR operation. Only two of the eight instructions arc 
required to pick a specific entry from the table. If the table contained only one entry, which corresponds to a simple BSR, five instructions 
would be needed. 

Conclusion 

Ihe architecture of the MC68000 family of parts permits both reentrant and position independent code. These two important code features are 
easily obtained and there is minimal cost in terms of extra coding, memory usage, or program speed to obtain either feature. The only lime 
that it becomes expensive memory or speed wise is then very long reaches to the destination in a position independent operation are needed. 
Ihe range that the MC68000 can reach with no loss of effectiveness is plus or minus 32000 bytes. 
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SETEXT extension codes 



8 



X BIN 


EQU 





X TXT 


EQU 


1 


X CM) 


EOU 


2 


X BAS 


EQU 


3 


X SYS 


EQU 


4 


X BAK 


EOU 


5 


X SCR 


EOU 


6 


X OAT 


EOU 


7 


X SAC 


EOU 


8 


X DIR 


EQU 


9 


X PRT 


ECU 


10 


X OOT 


EQU 


11 



* Error numbers 



f 



E IIJjG 


EOU 


1 




E OPEN 


EOU 


2 




E EXST 


EOU 


3 




open for write 






E FNF 


EQU 


4 




E DFUL 


EQU 


7 




E EOF 


EOU 


8 




E READ 


EQU 


9 




E WRIT 


EQU 


10 




E WPRT 


EQU 


11 




E DPR.T 


EQU 


12 




E FCB 


EQU 


13 




E DNR 


EQU 


16 




E STS 


EQU 


18 




closed file 


) 






E IDX 


EQU 


19 




E FSPC 


EQU 


21 




E OVFL 


EQU 


23 




file 








E NREC 


EQU 


24 




E EREC 


EOU 


25 




damaged 








E SNTX 


EOU 


26 




E PRNT 


EOU 


27 




E_MRDW 

* 


EQU 


28 




* 

* Terminal dri 


hers jump 


table 


T INNE 


EOU 


SD3E5 




T IRQH 


EQU 


SD3E7 




T SWIV 


EQU 


$D3E9 




T IRQV 


EQU 


$D3EB 




T TOFF 


EQU 


SD3ED 





illegal FMS function code 
requested file in use on open 
file already exists on rename or 

file not found 
disk, full 

end of file encountered 
disk file read error 
disk file write error 
file or disk is write protected 
file is delete protected 
illegal file control block 
disk drive not ready 
file error (read/write on wrong/ 

random byte number > 255 
illegal filename specification 
sector map overflow creating random 

non-existant record number specified 
record number match error, file 

contnand syntax error 

command not allowed while printing 

hardware configuration error 



addresses 

input character, no echo 
IRQ interrupt handler 
SHI3 interrupt vector 
IRQ interrupt vector 
timer off 



T TON 


EOU 


SD3EF 


T TINT 


EOU 


SD3F1 


T M3N 


EOU 


SD3F3 


T WIT 


EQU 


SD3F5 


T STAT 


EQU 


SD3F7 


T OUTC 


EOU 


SD3F9 


T INCH 


EQU 


SD3FB 



* Disk driver entiy points 



D READ 


EQU 


SDE00 


D WRIT 


EQU 


SDE03 


D VRFY 


EOU 


SDE06 


D RSTR 


EQU 


$0£09 


D DRIV 


EQU 


SDEOC 


D CHK 


EQU 


SDEQF 


D QCHX 


EOU 


$DE12 


D IN IT 


EOU 


SDE15 


D XARM 


EQU 


SDE18 


D SEEK 


EQU 


SDE1B 



tinier on 

timer initialise 

monitor entry 

terminal initialisation 

input status check 

output character 

input character, with echo 



read sector 
write sector 
verify sector 
restore to track zero 
select drive 
check drive ready 
quick check drive ready 
initialise drivers 
warm start drivers 
seek track 



\ 
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* a***************************************************************************** 

* 

* DO. TXT - FI£X COfttND FII£ PROCESSOR 

* 

****ft**ft****ft*ft*ft***ft«*»ftft*«««ftft«»ftft»ftft««**ftft*»*********ft**ft***ft* •»*••*•**»•* ft* 

* 

* Comnand syntax : 

* 

* DO <conma/id file> {<parameter 1> <parameter 2> <parameter 9>} 



turn on/off echoing of coraand 

exit from command file 
continue command file from 

goto <label> if condition met /not 



* Conmand file syntax : 

• 

* ECHO ION I OFF] 
lines 

* EXIT 

* GOTO <label> 
<label> 

* IF (NOT) <cond> GOTO <label> 
met 

* IF {NOT) <cond> THEN. .EISE. .ENDIF compound IF structure 
» NOTE <message> output message 

* ON ERROR (CONTINUE I GOTO <label>] clear/set error trap 

* PAUSE <message> output message and wait for key 
input 

* REM <cammEnt> corarent 

* SHIFT shift parameters 1 to 9 left 

* !<cgnnKnt> comment 



8 



2 






• 8<label> label 

t 

* IF conditions (<cond>) nay be one of the following 



• EXIST <file> 

• ERROR 
occurred 

• <str> - <str> 
equal 



condition true if <file> exists 
condition true if an error has 

condition true if strings are 



* Substitution parameters are identified as follows : 

• 

* %0 filename of command file 

* %1 - %9 ccmnand line parameters 1 to 9 

* tc read one character from the terminal 

* *1 read a line from the terminal 

* ** the character I 



OPT 

TTL 



FAG 

FLEX COMMAND FII£ PROCESSOR 



* INCLUDE FIEX LIBRARY HEADER FILE {HOT LISTED) 



OPT 


NOL 


LIB 


FLEX.H 


OPT 


LIS 



CONSTANTS 



NPARAM 


EQU 


10 


BUFIEN 


EQU 


12S 


BRXCHR 


EQU 


$03 


CR 


EQU 


$00 


IF 


EQU 


SOA 


SPACE 

* 


EQU 


$20 


PARCOM 


BOU 


1 


PARELS 


BOU 


2 


PARNOP 


BOU 


3 


PARERR 


EQU 


4 


PARHST 


EQU 


S 


PARGTO 


BOU 


6 


PAR IF 


EQU 


7 


PAR NOT 


EQU 


e 


PAROFF 


EQU 


9 


PARON 


EQU 


10 


PARTHN 


EQU 


11 



MAXIMUM NUMBER OF PARAMETERS 
BUFFER AREA FOR PARAMETERS 
BREAK CHARACTER 



PARAMETER VALUES 



• TRANSIENT PART OF 'DO' 



SETDP 

ORG $C10D 

* 

DO BRA START 

VN FCB 1 

FCC 'Copyright 1987 DE Howland.' 

FCC 'Kay be copied for personal use only. 



»*•**«««*•*■•** 



• MESSAGES FOR TRANSIENT PART OF 'DO' 



PARESH 


FCC 
FCB 


'Parameters 
4 


too 


long' 


PTRERM 


FCC 


'Too many parameters' 




FCB 


< 






DEFEXT 

» 


FCC 


•BAT' 




DEFAULT COMMAND FILE EXTENSION 


* 
START 


STS 


SAVESP 








TST 


CMDFLG 




IF NESTED 'DO' THEN SKIP RESIDENT 




BNE 


NESTED 








IJ>D 


MEMEND 




SAVE MEMEND 




STO 


svmswd 








SUBD 


IENDDO-RESIDO+1 


SETUP NEW MEMEND ON PAGB BOUNDARY 




CLRB 










SUBD 


11 








STD 


MEMEND 








STD 


NEHMND 








LDA 


TTYPS 




SAVE TTY PAUSE 




STA 


SVPAUS 








CLR 


■nyps 




DISABLE PAUSE 




LDA 


SPECIO 




SAVE SPECIAL 10 FLAG 




STA 


SVSPIO 








[DA 


tl 




DISABLE ESCAPE PROCESSING 




STA 


SPECIO 







* INITIALISE VARIABLES 
NESTED CLR INPARM 



NOT EXPANDING PARAMETER 



• READ COMMAND FII£ NAME FROM COMMAND LINE 

GBT FCB POINTER 



LDX 

JSR 
8CC 
DSKER1 LBRA 

SPBCOK 7ST 



IDOFCB 
GETFIL 
SPECOK 
DSKERR 

F EXT,X 



REPORT DISK eRRQR 

IF NO EXTENSION HAS SPECIFIED 



8 






s 



8 



£ 



BNE 


EXTOK 


IDD 


DEFEXT 


STD 


F EXT.X 


LDA 


DEFEXT+2 


STA 


F_EXT+2,X 



THEN SETUP DEFAULT EXTENSION ".BAT' 



* OPEN COMMAND FILE FOR READ AND CLOSE IT AGAIN TO KEEP IT OUT OF THE FCB 
CHAIN 



BXTOK 



IDA 


»M OPNR 


STA 


F FUNC,X 


JSR 


FNS 


BNE 


DSKER1 


LDA 


♦M CLOS 


STA 


F FUNC.X 


JSR 


FHE 


BNE 


DSKER1 


LDA 


IM OPNR 


STA 


F ACT,X 


LDA 


#M READ 


STA 


F_FUNC,X 



OPEN FCB FOR READ 



CLOSE IT AGAIN 



SET ACTIVITIY STATUS - OPEN FOR READ 
SETUP TO READ BYTE 



* READ PARAMETERS FROM CO!>fffiND LINE 

* 

BSR RDCMDL 

* 

* HOVE RESIDENT PART OF 'DO' TO TOP OF MEMORY 





LDX 


IRESIDO 


SOURCE POINTER 




LDY 


^e(£ND 


DESTINATION POINTER 




LEAY 


ijt 




MDVEDO 


LOA 


rX+ 






STA 


,Y+ 






cmpx 


tENDDO 






BNE 


KJVEDO 





IF NESTED "DO' JUMP TO WARMS EI.SE JUMP TO 'DO' COMMAND LOOP 





TST 


CHDFIG 




BEQ 


GOTODO 




JMP 


WARMS 


GOTODO 


LDX 


(EMEND 




LEAX 


1,X 




JMP 


C,X 



JUMP TO RESIDENT PART OP 'DO' 



COMMAND LINE AND PARAMETER PROCESSING ROUTINES 



READ COMMAND LINE INTO BUFFER AND PROCESS PARAMETERS 



ROCKDL 


BSR 
CLRB 


INITCB 


RDCM1 


JSR 


NXTCH 




CMPA 


ICR 




BEO 


RDCMEX 




CMPA 


1" 




BEQ 


RDCKLB 




CMPA 


,.. 




BNE 


RDCM1A 


RDCM1B 


TFR 


A,B 




JSR 


NXTCH 




CUPA 


ICR 




BEQ 


RDCMEX 


RDCM1A 


BSR 


PUTPTR 


RDCM2 


TSTB 






BNE 


RDCM2A 




CMPA 


{SPACE 




BEQ 


RDCM4 


RDCM2A 


PSHS 


B 




CMPA 


,S+ 




BNE 


RDCM3 




CIRB 






LDA 


[LINPTR] 




CMPA 


{SPACE 




BNE 


RDCM4 




JSR 


NXTCH 




BRA 


RDCM4 


ROCM3 


BSR 


PUTPAR 




JSR 


NXTCH 




CMPA 


KR 




BEQ 


RDCMEX 




BRA 


R0CM2 


RDCM4 


BSR 


ENDPAR 




BRA 


R0CM1 


RDCMEX 


BSR 
RTS 


ENDPAR 



INITIALISE COJWAND BUFFER 
CLEAR LAST QUOTE FLAG 
GET NEXT CHAR FROM COMMAND LINE 
IF CR THEN EXIT 

IF CHAR IS EITHER TYPE OF QUOTE 



THEN SET IAST QUOTE 
GET NEXT CHAR 
IF CR THEN EXIT 

ELSE HAVE START OF NEW PARAMETER 
IF IAST QUOTE FIAG - 

THEN IF CHAR m SPACE. HAVE SEPARATOR 

IF CHAR - IAST QUOTE 



THEN CLEAR LAST QUOTE FLAG 
IF NEXT CHAR « SPACE 



THEN GET IT 



PUT CHAR INTO PARAMETER BUFFER 
GET NEXT CHAR FROM COMMAND LINE 
IF CR THEN EXIT 



END OF PARAMETER; PUT ZERO 



• PUT ZERO OR CHAR TO PARAMETER BUFFER 

* 

ENDPAR CLRA 

PUTPAR CMPX BUFFER+BUFIEN-1 

BEQ PRMERR 

STA ,X+ 

RTS 



PRMERR LDX 
LBRA 



(PARERM 
PERROR 



OUTPUT PARAMS TOO LONG MESSAGE AND EXIT 



s 

I 

If 

c 

I 



S 



XX 



* 
• 
• SETUP PARAMETER POINTER 


• 








» 








* 

PITIPTR PSHS 


X,D 




ORG 


$100 




IDY 

cmpy 


CURPTR 
IPARPTR+2*NPARAM 


* 
RESIDO 


LBRA 


RESID 




aeo 

100 


PTRERR 

memend 


* 

• VARIABLES 






SUBD 
LEAX 


tRESIDO-1 
D,X 


SAVESP 


RMB 


2 


SAVED STACK POINTER 


STX 


, Y++ 


SVMEND 


RMB 


2 


SAVED (CMEND 


STY 
PULS 


curptr 

X.D 


SVPAUS 
SVSPIO 


RMB 

RMB 


1 
1 


SAVED TTY PAUSE FLAG 
SAVED SPECIAL 10 FLAG 


RTS 




NEMWD 


RMB 


2 


NEW MEfCND FOR EXIT CHECK 


* 




OOPCB 


RMB 


F_LEH 


FCB FOR READING COHWTO FII£ 


PTRERR IOX 
LBRA 


IPTRERM OOTPUT TOO KANT PARAMS MESSAGE AND EXIT 
PERROR 


BUFFER 
PARPTR 


RMB 

RMB 


BUFLEN 
2*NPARAK+2 


PARAMETER BUFFER 
PARAMETER POINTERS 


* 




CURPTR 


nte 


2 


CURRENT PARA>CTER POINTER 


* 




ERRLAB 


RMB 


9 


ERROR LABEL (IF ERRFLG <> 0) 


• INITIALISE COMMAND BUFFER AND POINTERS 

• SET PARAMETER ^COMANO FILE NAME 

• 


LABEL 

LASPTR 

TRMADR 


RMB 
RMB 
RtS 


9 
2 
2 


TEMPORARY LABEL BUFFER 

LABEL POINTER 

ADDRESS OF LINE TERMINATOR 


INITCB IOX 


•BUFFER +BUFLEN-1 


SAVECH 


RMB 


1 


SAVED ECHO STATUS 


CIR 

icy 


D, X SETUP NULL PARAM AT END OF BUFFER 
IPARPTR+2 


* 

INPARH 


FCB 





PARAMETER EXPANSION FLAG (0 - NOT IN 


LOB 
INITL1 STX 
DECS 


MP ARAM 

,Y++ SET PARAM POINTERS 1 TO 9 -> NULL PARAM 


PARAM) 

INLINE 
MIEXT 


FCB 
FCB 






TERMINAL LINE FLAG (0 - NOT TERMINAL) 
TERMINAL TEX7 FLAG (0 - NOT TERMINAL) 


BNE 


INITL1 


5TLINE 


FCB 


SFF 


START OF LINE FLAG (NEXT CHAR = START OF 


mx 

POINTER 


IPARPTR+2 SET CURRENT PARAM POINTER -> PARAM 1 


LINE) 
IFLEVL 


FCB 





CURRENT 'IF' NESTING LEVEL 


STX 


CURPTR 


IFLEVX 


FCB 





BYPASS IF NESTING 1EVEL 


I OX 

LDD 
SUBD 


IBUFFER SET PARAM POINTER -> BUFFER 

ffiKENP 

IRESIDO-1 


ERRFLG 
LSTERR 
ECHOFL 


FCB 
FCB 
FCB 




SFF 


ERROR HANDLING FIAG (DEFAULT - CONTINUE) 

LAST DOS ERROR 

COMMAND FILE ECHO FLAG (DEFAULT ■ ECHO) 


LEAX 


D,X 


GOTOFL 


FCB 





GOTO FLAG (0 - NOT LOOKING FOR LABEL) 


STX 


PARPTR 


NOTFLG 


FCB 





•NOT' PARAM FIAG (0 - 'IF', SFF - 'IF 


LOX 


IBUFFER 


NOT') 








LDY 
BUFFER 


tDOFCB+F_NAHE MOVE COMMAND FILE NAME WTO PARAM IN 


• COMMAND TABLE 






LDB 

INITL2 LOA 

aeo 

STA 

DECB 

BNE 

INI73 CLR 
RTS 

• 


18 
• Y+ 
INIT3 
»X+ 

INITL2 

, X+ TERMINATE PARAM WITH ZERO 


ft 

CTABLE 


FCC 
FCB 
FOB 
FCC 
FCB 
FOB 
FCC 
FCB 
FOB 
FCC 
FCB 


•ECHO' 


DOECHO-CTABLE 
•ELSE' 


OOE LSE-CT ABLE 
•END IF' 


OOENDF-CTABIZ 
'EXIT' 









• 




• RESIDENT PART 


OF *D0' 




FOB 


DOEXIT-CTABLE 


To Be Continued 
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Surplus Unused Motorola VME Modules & Electronic Solutions Enclosures for Sale at Discount 
MVME133 CPU Module-68020, 1MB DRAM, 68881 FPP, $675 

3 serial Pons, EPROM Sockets, VMEbus Interface 
MVME225-1 1MB DRAM Module, A32/D32 VMEbus Interface $380 

MVME320A Winchester/ Fllopy Controller $490 

MVME332 8 Channel intelligent Serial Communications Module $675 

Series 7 Electronic Solutions 7 Slot Desktop Enclosure, P1/P2 $695 

Backplane, 325W PS, Space for Winchester/Floppy/Tape 

Respond to: John Gannon, RPG, P.O. Box C12399, Ste 162, Scottsdale, Arizona 85267 Phone (602) 951- 

3373 

*** 

S+ Memory Cards, CPU Cards, Hard Disks w/Controller Cards, I/O Cards, Cabinets, Power Supplies. 
S/09 CPU Cards, Memory, I/O Cards, Controller Cards, Cabinets, Power Supplies 
3-Dual 8" drive enclosure with power supply. New in box. $125 each. 
5-Siemens8" Disk Drive, $100 each. 

Tom (615) 842-4600 M-F 9AM to SPM EST 

#** 

Motorola VME-10 with hi resolution monochrome monitor, hard disk, serial and parallel cards, Pascal, 

assembler, linker and documentation. Almost new $4500. 

Two SSB-6809 systems with hard disks, miscellaneous software. Make Offer 

Cadwell Laboratories, 909 N. Kellogg Street, Kennewick, WA 99336, (509) 735-6431 
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FLEX /SK-IIOS A1S-IIOS 
Transfer Utilities 

For 68XXX and CoCo* OS-9™ Systems 

Now READ - WRITE - DIR - DUMP - EXPLORE 
FLEX, SK-DOS & MS-DOS Disk 

These Utilities come with a rich set of options allowing the 
transfer of text type files from/to FLEX & MS-DOS disks. 

*CoCo systems require the D.P. Johnson SDISK utilities and OS-9 and two 
drives of which one must be a "host" floppy. 
CoCo Version: $69.95 68XXX Version $99.95 



S.E. Media 



PO Box 849, Hixson.TN 37343 



615 842-6809 MC/Visa 
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SK*DOS768K 

Read the line prim to see what's in SK* S/68K: 



D Full DOS documentation plus on-line help O Multiple directories 
D User-installable device drivers D Install up to 8 different I/O 
devices D Keyboaid type-ahead D Print-screen D Virtual (RAM) 
disk D Disk cache D Up to 10 drives O 5W or 3V4" floppy drives O 
Hard drives to 64 megabytes each O I/O redirection to drives or I/O 
D Time/date stamping of (lies D Pile or disk write protect (even 
hatd disk) D Batch Tiles O Support for 68000. 68010. 68020 Q 
Monochrome or color video board support D Read and write MS- 
DOS disk files D 6809 EmulatorQ Powerful utilities such as copy-by- 
date, undelete, show differences between files, prompted delete, text 
f le browse, and more - all included D Simple Basic included □ Fast 
assembler included □ Line editor included O User support via 
newsletter and BBS D Available software: C compiler, full Basic, 
screen editors, disassemblers, cross-assemblers, spelling checker, text 
formatter, music editor, hard disk manager. ROM-based debugger, 
modem communications programs, etc. More compilers coming. O 
(Some features may not be implemented in all hardware manufac- 
turers' implementations.) 

Individual copies of SK*DOS/68K are $140; less in 

K quantity or when bundled with hardware. Send 
i\for our 6809 / 68K hardware and software 
catalog. Also available as part of our 
hardware/software educational course. 
Software Systems Corp. 
P. O. 6ox 209J 
Ml. Kisco, NY 10549 
(914)241-0287 
BBS (914) M 1-3307 Fan (914) 241-8607 




68030 Modula-2 

OS-9 or PC Host, 880x0/6888x Target 



• Very fast compilation - 10500 Ipm (20MJ Iz 63020) 

• Very fast aeojtkx) -highly optimised compiler 

• Object code hair the size of other 08k compilers 

• Library aupport for all OS-9 system calls 

• All 680X0 series target processors supported 

• Source code tools and library source provided 

• Run-time debugger and ROM tools available 

• 500 pages of comprehensive documentation 

Modula-2 compiler, OS-9 or K host: $1790.00 
ROM took: $720.00 Run-time debugger $720.00 

Generic Lint 

OS-9 Multi-file C source code checker 



Detects errors, quirks, idiosyncracies and likely mistakes in 

multiple source and header files. Cuts debugging time by 

cutting out bugs I Generic Lint $398.00 

Call for information on OS-9 consultancy services. 
Trademarks: 'OS-9' Miaowaie, 'Generic Lint' Oimpci 
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Windsor Systems 
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2407 Urn* (On Lant. louHtMm, XY *OX22 U.SA 
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SOFTWARE 



68000 C CROSS-CO M PI LKR 

site - SKix>SMSoox.i'nrxjtKSix ioajtcr om.it 

Acks* KAR Cbf^guaer. fncnbcN fcrtun ttvmCfcf cftk 
incbdei6W>10cfoat«ot*tar: liteane! prwiflfl) tv SKB#S Ui miy h; ntodiTiOd 

CROSS-ASSEMUI.ICRS WITH MACRO CAPABILITIES 

EACH 3SI.FIJ-:X,OS9.VKIFU>XMSI>05.0H1X,SK1H>S,XESIX JlSIK Al.lJSlM 

Sp».<r IBOn,ll3a2.«Mmi. iskm.osos.mot.zs. z*o. *»»«. Mil. aws. twin. K—« 
MnSji^ctuM-ftucmUcniaC wtb kMtfenkad imln*i S<*#a:.lar orfAi*»»lS5Oe«ti.510O(<if 
J. S30D(a>ill 

CMOl>EM TELECOM MUN1CATIONS PROGRAM 

tlM.»5O0S.SKD0S.VNIX,fU:X,0Sf,XESIX.Vmril!X oeiect.oki.t. EACH ISO 

Mcaj4fivca »iih ipiiui mode, fit* wufer. MOS£M7. XVH XOFF.dc 

SUPER SLEUTH DISASSEMBLERS 

KACII H9.HJ:X SI310S9 SHX.VKIH.EX OUKCT-OS l,T F,\CH SS0 ft.f:XX>S1JLOCO 
lnwacnwl>|J3*»x*Mo/e*ondtU vtfAUtieb. ncliMta Md. b«wy aSwnx 
Spttity MWn.tJ.l.lJt.WUO: »m™<» ZKVSm.<i .cnuni 
COCO DOS iwlafcfc m VWCU .2.1.5 J WM! aim In 7«mran.5} only 
t»19 wnmc SIM FLM.OS».liN1l-Li: IC.MSOOS. UNIX. *KDt>5. XtMX 

DEBUGGING SIMULATORS FOR POPULAR 8.BIT CPUS 

CACM S7S.FLEX tlW Oil UCUNIFLEX OBJECT-OHLT EACH ISO COCO FLEX. COCO OSS 

lQkyKUvt4r c>*abK ("nfln. ikUb tewn Ny (sraiajl |. birur. eJtWIS 
SpKlfr It* tanVl. (10690). 6W1 txn OS! only. ZH> FLEX oely 

ASSEMBLER CODE TRANSLATORS FOR 6502. 6800/1. 6809 

(SUM MM S'S.FLtX US-OS* IWVK1FLF.X 

MOW/ « w« * am a *».m ssifixx wsjat o»* ho.hsifux 

FULL-SCREEN XBASIC PROGRAMS .111 runo. icmlrol 
AVAILABLE FOR FLEX. UNIFLEX, AND MSUOS 



MmIioj Lim Sytttm 
liNcnliTy wrth MWI" 
T.bub fUsa SprcadiAccI 



SVJ w/<ou/r«, Jii tnihcu 

t«»»/*»ne. J»*iita» 

]10D»Aom», Mil 
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DISK AND XBASIC UTILITY PROGRAM LIBRARY 
t&FLtX SM-tlNIFIJ-XIMSUOS 



V- 



CddAikwcvwi-atiiloj^rt^y miiniMt iruracf ■mulocj. dadhk wu. ffoquncc JCmc OfaJI 
BASIC pr»*7rf>. irtf BASIC («vt™». <*- r** RJLX veriaaAiirtludf son and tcaccpcraii? only 



PROFESSIONAL SERVICES 

FOR THE COMPUTING COMMUNITY 



CUSTOMIZED PROGRAMMING 

We will cuaotnie? wty of tf*c pnwwn* tVxnbnl in tftik Advcfttscraenl or ui our t*och*«ft for 
stRVitiiuii custno u* or to «m» new rTOBK the clvgc fur bc& ruBomua<MM depend* 
ufMiihc enjfVaibiJiiy of 4he tatadiftaiatM*. 

CONTRACT PROGRAMMING 

We *UI oetlc new p»o ynjii or raadtfy cxiuinf propiatot ■ contract tatt, i icmce *c hjvf 
ffw»kal Tor Dvcr l*rat y yean; ttic ull|UOl on atftkh wo t\«vc prrformotl ana pragrMnmsng 
incfadc mail pc^uls ovskfc d mstfiOuots. ttxivA^t IBM. Burottyfa* . Uuvax. Kf*»f,-rll , rnou 
rvpalw model* of min*Hm|Kia«ti. incliadlag OCC. IBM. DC. HP. A TAT, «mt *Bat( pufMttr 
•VintV of mtoocom puurt. mcltkiing (JWO/t . feffio, «*]». 6502. 680*0. Uuef nca •(Wi^vtaic 
•Ajiuxo and c^Enlint cyitemi. oo «jt*»»"»j« ran|Lr( tt n« fam Urfe lefctcrtwiuaicaisora to 
•irvk bo*/d contmiia^ tte c htjft* far crjnff*ti (rDyammmg h uftuily byihe to**** by ttc iBflt. 

CONSULTING 



cctataluanf wrvjce*, inct«l«S lemuwt Jdvm. 
t L:hkVjc for couu lun| tt rvnuily 



W« ofTcr a *Uk rviijc of 

cr%trun(. and Oatffi, on ny topic nlMcd to 

tBiad opon umc>t«wl.and tucmua* 



Computer Systems Consultants Inc. 



'Mim w1. 



H«UU»L« 

Conyen. Omxi. Juan 

(4W)4>1^ST0 . KUmnil 



VHA ad MUTHt CJUIEJ 
- ■ OSfl H..i..i>. CUCD T,m, 
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Clearbrook Software Group (604)853-9H8 




CSG IMS Is THE full featured relation- 
al database manager for OS9/OSK. 
The comprehensive structured ap- 
plication language and B + Tree Index 
structures make CSG IMS the ideal 
tool for file-intensive applications. 
CSG IMS for CoCo2/3 OSS Ll/2 (single user) $1 69.95 

CSG IMS for OSS L2 or 66000{multl user) $495.00 

CSG IMS demo with manual $30 



MSF • MSDos File Manager for C0C0 3/OS9 Level 2 
allows you to use MSDos disks directly under OS9. 

Requires C0C0 3, OSS L2, SDISK3 driver $45.00 



SERIN A - System Mode Debugger for OS9 L2 

allows you to trace execution of any system- module, 
set break points, assemble and disassemble code and 
examine and change memory. 

Requires CoCo3 or Glmlx II. OS9 L2 & 80 col. terminal $139.00 



ERINA • Symbolic User Mode Debugger for OS9 
lets you find bugs by displaying the machine state and 
Instuctlons being executed. Set break points, change 
memoty, assemble and disassemble code. 

Requires 60 column display, OS9 Ll/2 $69.00 



Shipping: N. America - $5, Overseas - $10 
Clearbrook Software Group P.O. Box 8000-499, Sumas, WA 98295 
GSB ti a ttfrdtfrwk of Mbcrotfwt Byiiomt Corp., MSDot li a trademarlt of Microsor Corp. 









SPECIAL 

ATARI™ 

& 
OS-9™ 



NOW! 

If you have either the 

Atari 520 or 1040 - 

you can take 

advantage of the 

"bargain of a lifetime" 

OS-9 68K and BASIC 

all for the low, low price of: 



$150.00 

Call or Write 

S.E. AAedia 

5900 Cassandra Smifh Rd. 

Hixson. TNI 37343 

615 842-4601 



"S 



ATARI & AMIGA 
CALL 

As most of you know, we are veiy sensitive to your 
wishes, as concerns the contents of these pages. One of 
the things that many of you have repeatedly written or 
called about is coverage forthe Atari & Amiga™ series of 
6B000 computers. 

Actually we haven't been too keen on those systems 
due to a lack of serious software. They were mainly 
expensive "game-toy" systems. However, recently we are 
seeing more and more honest-to-goodness serious soft- 
ware for the Atari & Amiga machines. That makes a differ- 
ence, i feel that we are ready to start some serious looking 
into a section forthe Atari & Amiga computers. Especially 
so since OS-9 is now running on the Atari (review copy on 
the way forevalu ation and report to you) and tumored for 
the Amiga. Many of you are doing all kinds of interesting 
things on these systems. By sharing we all benefit. 

This I must stress -Input from you on the Atari 
£- Amiga. As most of you are aware, we are a 
"contributor supported'* magazine. That means 
that YOU have to do your part. Which is the way it 
has been for over 10 years. We need articles, tech- 
nical, reviews of hardware and software, pro- 
gramming (all languages) and the many other fac- 
ets of support that we have pursued for these many 
years. Also I will need several to volunteer to do 
regular columns on the Atari & Amiga systems. 
Without constant input we can't make it flyl So, if 
you do your part, we certainly will do ours. How 
about it, drop me a line or give me a phone call and 
I will get additional Information right back to you. 
Weneedyour input andsupportif this is tosucceed! 

DMW 
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68 Micro Journal 



THE 6800-6809 BOOKS 

..HEAR Ye. HEAR 



OS-9" 
User Notes 



By: Peter Dibble 

The publishers of 68' Micro Journal are proud to make 

available the publication of Peter Dibbles 

059 USE! TIES 

Information for the BEGINNER Co tbe PRO, 
tegular or CoCo 0S9 

Osing 0S9 

HELP, MINTS, PROBLEMS, REVIEWS. SUGGESTIONS, COMPLAINTS. 

OSS STANDARDS. Generating a New Bootstrap, Building a 

new System Disk, 0S9 Users Group, etc. 

Progren interfacing to 0S9 

DEVICE DESCRIPTORS, DIRECTORIES. "FORKS", PROTECTION. 
■SUSPEND STATE", "rlPES". "INPUT/OUTPUT SYSTEM", etc. 




Progressing Language! 

Assembly Language Programs and Interfacing; Baslc09, C, 

Pascal, and Cobol reviews, programs, and uses; etc. 

Disks Include 
■o typing *11 tbe Source Listings in. Source Code and. 
where applicable, aasembled or compiled Operating 
Progress. The Source and Che Discussions In Che 
Columns csn be used "aa la", or as a "Starting Point" 
for developing your OWN more powerful Programs. 
Programs sometimes use multiple Lsnguagea such ss s 
short Assembly Language RouClne for reading a 
Directory, which is then "piped" Co a Baslc09 RouClne 
for oucpuc formacdng. ecc. 



BOOK $9.95 

Typesec -- w/ Source listings 

O-Hole Punched; 8 X II) 

Deluxe Binder SS.5U 



All Source Listings on Disk 



1-8" SS. SD Dlak - 
2-y SS. DD Disks 



- SH.95 
- S24.95 



FLEX™ 
USER NOTES 

By: Ronald Anderson 

The publishers of 68 MICRO JOURNAL sre proud Co 
make available the publication of Ron Anderaon'a FLU 
USEE MOTES, In book form. This popular monchly column 
has been a regular feacure In 68' MICRO JOURNAL SINCE 
1979, 1c has esrned Che respect of thousands of 
68 MICRO JOURNAL resders over the years. In fact, 
s column has been described as the 'Bible' for 68XX 
users, by some of the world's leading microprocessor 
professionals. The most needed end populsr 68XX book 
available. Over Che years Ron's column hss been one of 
Che most populsr In 68 MICRO JOURNAL. And of course 
68 MICRO JOURNAL Is Che mosc popular 68XX magazine 
published. 

Listed below sre s few of the TUT files Included In the 
book and on diskecce. 

All TEXT dies m the Book are on the disks 

LOGO CI File load program to offset memory — ASM PIC 

MEMOVECl Memory move program — ASM PIC 

DUMP Cl Pnnler dump program — uses LOGO — ASM PIC 

SU8TESTC1 Simulation of 6800 code 10 6809. show differences — ASM 

TERMEM C2 Modem input to disk (or other pod input to disk) — ASM 

M C2 OuipDi a file to modem lor another port) — ASM 

PAINT C3 Parallel (enhanced) pnnler dnver — ASM 

MODEM C2 TTL output to CRT and modem (or other port) — ASM 

SCIPKG Cl Scientific math routines — PASCAL 

U C4 Mini. monitor. disk resident, many useful functions — ASM 

PRINT C4 Parallel pnnler driver, without PFL AG — ASM 

SET C5 Set printer modes — ASM 

SETBAS1 CS Set printer modes — A-BASIC 

NOTE: .CI..C2, etc. -Chapter I, Chapter 2, etc. 

••Over 30 TEXT flies Included is ASM (assenbler)-PASCAL- 
PIC (position Independent code) TSC 6ASIC-C, etc. 

Book only: $7.95 + $2.50 S/H 
With disk: 5" $20.90 + $2,50 S/H 
With disk: 8" $22.90 + $2.50 S/H 



Shipping & Hindllng $3 30 per Book. $2.30 per Disk set 

Poretgn Oldas Add 54.S0 Surface Mifl 
or $7 00 Air Mail 

If Paying by check . Please allow 4-6 weeks delivery 

* All Currency in U.S. Dollars 



Continually Updated In 68 Micro Journal Monthly 



Computer Publishing Inc. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 



"FLEX Is a trademark of Technical Systems Consultants 

"0S9 Is a trademark of Mlcroware and Motorola 

"68' Micro Journal Is a trademark of Computer Publiahlng Inc. 



(615) 842-4601 

Telex 5106006630 
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!!! Subscribe Now !!! 
68 MICRO JOURNAL 

OK, PLEASE ENTER MY SUBSCRIPTION 

Bill My: Mastercard | | VISA| | 
Exp. Date 



Card# 



For 1 Year 



2 Years 



3 Years 



Enclosed: S 



Name. 

Street 

City 



State 



Zip 



Country_ 



My Computer Is: 



Subscription Rates 



U.S.A.: 1 Year $24.50, 2 Years $42.50, 3 Years $64.50 
♦Foreign Surface: Add $12.00 per Year to USA Price. 
♦Foreign Airmail: Add $48,00 per Year to USA Price. 

♦Canada & Mexico: Add $9.50 per Year to USA Price. 

♦U.S. Currency Cash or Check Drawn on a USA Bank ! 




68 Micro Journal 

5900 Cassandra Smith R 
POB 849 
Hixson.TN 37343 



■I 



Telephone 615 842-4600 
Telex 510 600-6630 



^ 
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Reader Service Disks 

Disk- 1 Fileson. Minicat, Minicopy.Minifms, "'Lifetime, "Podiy, 

••Foodlisi. ••Die*. 
Disk- 2 Diskedil w/ inst & fixes, Piime, 'Pnnod, "Snoopy. 

••Football, ••Hexpawn,'*Lifcume. 
Disk- 3 Cbug09, Sec], S«c2, Find, Tab]e2, lntexl. Disk -exp, 

•Disksave. 
Disk. 4 Mailing Program, "Finddat. 'Change, 'Tcsldisk. 

Disk- 5 'DISKFIX I, 'DISKFIX 2, •♦LETTER, "LOVESIGN. 

••BLACKJAK. ••BOWLING. 
Disk- 6 "Purchase Order, Index (Disk file indx). 

Disk- 7 Linking Loader, Rload, Harkness. 

Disk- 8 Cncsi, Lanpher (May 82). 

DLsk- 9 Daiccopy, Disk fix9 (Aug 82). 

Dlsk-10 Home Accounting (July 82). 

Disk-] 1 Dissembler (June 84). 

Disk- 12 Modem 68 (May 84). 

Disk- 13 a 1ni<mf68. Tesimf68.*Cteanup.*Dskalign,lielp.Daie.Txl. 

Disk- 14 'Init. 'Test •Terminal, 'Find. 'Diskedil. Inil Lib. 

Disk-lS Modem9 + Updates (Dec. 84 Gilchrist) lo Mod cm 9 

(April 84 Commo). 
Disk- 16 Copy.Txl, Copy.Doc. Cat.Txl. Cai.Doc. 

Dlsk-17 Malch Utility, RATBAS, A Basic Preprocejs or. 

Dlsk-18 Parse.Mod.Sizc.Cmd (Sept 85 Annsirong),CMDCODE. 

CMD.Txl (Sept. 85 Spray). 
Dlsk-19 Clock, Date, Copy, Cat, PDI-LAsm & Doc.Enon.Sys, 

Da. Log. Asm & Doc. 
Disk-20 UNIX Like Tools (July & Sept 85 Taylor A Gilchrist). 

Dragon.C. Grep.C. LS.C. FDUMP.C. 
1 Jlsk-2 1 Utiilit cs & Gaines • Date. Life. Madness, Touch, Goblin, 

Slarshot. & 15 more. 
Disk-22 Read CPM & Non-FLEX Disks. Fraser May 1984. 

Disk-23 ISAM. Indexed Sequential file Accessing Methods, 

Condon Nov. 1985. Extensible Table Driven. Language 

Recognitor Utility, Anderson March 1986. 
Disk-24 68' Micro Journal Index of Aiticles A Bit Bucket Items 

from 1979 - 1985, John Current. 
Disk 25 KERMTT for FLEX derived from the UNIX vcr. Burg 

Feb. 1986. (2)-5" Disks or(i)-8" Disk. 

Disk-26 Compacla UniBoard review, code & diagram. Burl] son 

March '86. 
Disk-27 ROTABIT.TXT. SUMSTEST.TXT. CONDATA.TXT. 

BADMEN.TXT. 
Dlsk-28 Cr-82 Emulator, bit mapped. 

l)isk-2!» "Star Trek 

' Disk-30 Simple Winchester, Dec. '86 Green. 

Disk-31 •" Read/Write MS/PC-DOS (SK'OOS) 

Dlsk-32 Heir-UNIX Type upgrade - 68MJ 2/87 

Dlsk-33 Build the GT-4 Tennina] - 68MJ 1 1/87 Condon. 

Disk-34 FLEX 6809 Diagnostics. Disk Drive Test, ROM Test, 

RAM Test - 68MJ 4/88Koipi. 
NOTE: 
1 This is a reader service ONLY! No Warranty is offeted or implied, lhey are 
as received by 68* Micro Journal, and are for reader convenience ONLY 
(some MAY include fixes or patches). Also 6800 and 6809 programs are 
mixed, as each is fairly simple (mostly) to convert to the oilier. Software is 
available to cross-assemble all. 

* Denotes 6800 - •• Denotes BASIC 

*** Denotes 68000 - 6809 no indicator. 




8" disk $19.50 
5" disk $16.95 



m 


^ — ^^ — "^Bi 1 




MasterCard 1 


1 


k. ^aaataw. aaaT 



Shipping A. Handling -U.S.A. Add: - $3.50 
Overseas add: $4.50 Surface - $7.00 Airmail 

68 MICRO JOURNAL 

5900 Cassandra Smith Rd. 
Hixson.TN 37343 

(615)842-4600 - Telex 510 600-6630 
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K-BASIC* 



The Only 6809 BASIC to Binary Compiler for OS-9 

FLEX or SK*DOS 

Even runs on the 68XXX SK*DOS Systems* 



MHMH 



" ' ■■ '■.'. 



| Hundreds Sold at p 
i Suggested Retail: i 

■ $ 100.00 i 



• 6809 - 0S-9™ users can now transfer their FLEX™ 
Extended BASIC (XBASIC) source files to OS-9, com- 
pile with the OS-9 version and run them as any other 
OSS binary "CMD" program. Much faster than BASIC 
programs. 

• 6809 - FLEX users can compiler their BASIC source 
files to a regular FLEX "CMD" file. Much faster execu- 
tion. 

• 68XXX - SK'DOS™ users running on 68XXX systems 
(such as the Mustang-08/A) can continue to execute 
their 6809 FLEX BASIC and compiled programs while 
getting things ported over to the 68XXX. SK'DOS 
allows 6809 programs to run in emulation mode. This is 
the only system we know of that wil run both 6809 & 
68XXX binary files. 

K-BASIC is a true compiler. Compiling BASIC 6809 pro- 
grams to binary command type programs. The savings 
in RAM needed and the increased speed of binary 
execution makes this a must for the serious user. And 
the price is now RIGHT! 

Don't get caught up In the "Learn a New Lan- 
guage" syndrome - Write Your Program in 
BASIC, Debug it In BASIC and Then Compile 
It to a .CMD Binary File. 



For a LIMITED time 
save over 65%... 
This sale will not be 
repeated after it's 
over! * 

■— — — «\ 



.............. 

I SALE SPECIAL: 

I 

I 

I 

I 

V.............S 



$69.95 



SPECIAL 

Thank-You-Sale 



OnCy Jrom: 



C 



S.E. Media 



p 



i 



9900 Cassandra Smith Rd 

Hlxson, Tn 37343 

Telephone 615 642-6809 

Telex 510 600-6630 



A Division of Computer Publishing Inc. 
Over 1,200 Titles - 680D-68<^6flaD 



K-8ASKT wit nn infer 68XXX SK'DOS n awlain nuk fa die 680V. 

Pn« ubjea u> damge wthou mux. 
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PT-68000 SINGLE BOARD COMPUTER 

The PT68K2 is Available in a Variety of Formats 
From Basic Kits to Completely Assembled Systems 



BASIC KIT (6 MHZ) Board. 68000. 
HUMBUG MONITOR ♦ BASIC In ROM. 
4K STATIC RAM, 2 SERIAL PORTS. aH 
Components 5200 

PACKAGE DEAL • Complete Kit with 
Board 68000 10 MHZ. SK'OOS. 512K 
RAM. and all Necessaiy Parts S575 

ASSEMBLED BOARD (12 MHZ) 
Completely Tested. 1024K RAM, 
FLOPPY CONTROLLER. PIA, SK'DOS 
$899 

ASSEMBLED SYSTEM - 10 MHZ 
BOARD. CABINET POWER SUPPLY, 
MONITOR + KEYBOARD. 80 TRACK 
FLOPPY DRIVE. CABLES S1299 
For A 20 MEG DRIVE, CONTROLLER 
and CABLES Add $295 



PROFESSIONAL OS9 



"SK'OOS t> a Tiadamarti ol 

STAR-K SOFTWARE SYSTEMS CORP. 

*«S» » • Tr*l*nwfc d MkroKV* 



$500 




FEATURES 

MC68000 Processor. 8 MHZ Clock (optional 

10.12 5 MHZ) 

512K or 1024K of DRAM (no wait states) 

4K of SPAM (6116) 

32K.64K or 128K of EPROM 

Four RS 232 Serial Poits 

Floppy disk controller will control up to lour 

5 1/4-, 40 or 80 track. 

Clock with on-board battery 

2 • 8 bit Parallel Ports 

Board can be mounted in an IBM type PC/ 

XT cabinet and has a power connector to 

match the IBM type power supply. 

Expansion ports - 6 IBM PC/XT compatible 

I/O ports Ttie HUMBUG- monitor supports 

monochrome and/or color adaptor cards 

and Western Digital winctester interface 

cards 



PERIPHERAL TECHNOLOGY 



1710 Cumberland Point Dr., Suite 6 

Marietta, Georgia 30067 

404/984-0742 

VISAMASTERCARD/CHECK/C.O.D. 



Send For Catalogue 
For Complete Information On All Products 



(T 
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DATA-COMP 



SPECIAL 



Heavy Duty Power Supplies 




For A limited tkne our HEAVY DUTY SWTTCMNG POWER SUPPLY. These an BRAND NEW units. Note that these 
prices are less than 1/4 the normal pries for these high quality units. 



Make: Boschert 

Size: 10.5 x 5 x 23 inches 

Including heavy meaning bm±fl and reatsink. 

Rating; in 1 10/220 vote ac (snap change) Out 130 watts 

Oupuc +5v . 10 amps 
+12v-4.0 amps 
+12v ■ 2.0 amps 
-12v . 03 amps 

Mating Cttinecscr: Terminal strip 

Load Reaction: Aumxrulic short circuit recovery 

SPECIAL: $59.95 each 

2 or more $4955 each 

Add: S7J0cach SrH 



J ^ 



Make: Boschert 

See: ia7S x hi x Z25 inches 

Raring: 110/220 ac (strap change) Our 81 wans 

Outputs: +5v . 8.0 amps 
+I2v-24amps 
+12v 24 amps 
+12v -2.1 amps 
-12v - 0.4 amps 

Mating Qmam.' Molcx 

Load Reaction: Atatanatic short circuit recovery 

SPIOCIAL: $4955 each 

2 or more $3955 each 

Add J7 JO S/H ad) 



5900 



Smith Rd., Hbtson, Tn. 37343 Tetephone 615 8424600 



Tetex 510 60O663D 
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Now Offering: *FLEX'" (2 Versions) 
AND 'STAR-DOS PLUS+ '" 




For Ordering Call 

(615)842-4600 



FROM - DATA-COMP, C.P.I. 



A Family of 100% 68XX Support Facilities 

The Folks who FIRST Put FLEX' V on 

The CoCo 




TSC Editor 
NOW $3 SOT 



STAR DOS PLUS + 

• Functions Same as FLEX 

• Reads - writes FLEX Disks 

• Run FLEX Programs 

• Just type: Run * STAR-DOS" 

• Over 3100 utilities & progiams 
to choose from. 



PLUS 
ALL VERSIONS OF FLEX & STAR-DOS* INCLUDE 

Read-Write-Dir RS Disk + 




Run RS Basic from Both 
More Free Utlities 



External Terminal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
■f Memory Examine Program 
+ Many Many More!!! 



TSC Assembler 

Kr|i»00 

NOW $35.09 



UPS Battery Backup 



330 VA UPS 4 Outlets 

520 VA UPS 4 Outlets 

800 VA UPS 6 Outlets 

1200 VA UPS 6 Outlets 



Disks 



309.00 5" Box of ten ( 1 0) 

599.00 DS-DD 5.99 40 Track 

859.00 DS-DD 14.95 80 Track 

999.00 3.5 DS-DD $ 15.95 



Printers 



EPSON 

LQ-500 24 Pin 350. 00 

LX-800 9 Pin 239. 00 



Gender Changer 



SERIAL 

Male to Male 8.95 

Female to Female 8.95 

Centronics 

Male to Male 9.95 

Female to Female 9.95 



Switch Boxes 



Serial/Parallel Converter 69.00 

Parallel Serial Converter 69.00 

Serial 2 Position Switch Box 27.00 

Parallel 2 Position Switch Box 27.00 

Serial 4 Position Switch Box 35.00 

Parallel 4 Position Switch Box 33.00 

Serial 4 PoslUon Crossover Switch 44.00 

Parallel 4 Position Crossover Switch 49.00 

Serial 2 Position 9 Pin Switch Box 44.00 



DATA-COMP 

5900 CASSANDRA SMITH RD. 

HDCSON. TN. 37343 



SHIPPING 

USA ADD 2% 

FOREIGN ADD 5% 

MJN $3.60 



(615)842-4600 

FOR ORDERING 

TELEX 5 1O60O6630 



An Ace of a System in Spades! The New 

MUSTANG-08/A 



I 

I 

I 

I 

I 

I 

I 

l m 

I 

I 

I 

I 

I 

I 



I 
I 
I 



Now with 4 aerial ports standard At speed Increase to 12 Mhz CPU + on board battery 
backup and Includes the PROFESSIONAL OS*9 package - Including the $500.00 OS-9 

C compUerl This offer wont last forever! 



NOT 128K, NOT 512K 



tFULL 768K No Wait RAM 



Now even faster! 
with 12 Mhz CPU 



I 



The MUSTANOOF* system took mwy hand from al 
I other 68006 syaema we tested, naming OS-9 6BKI 
I The MU5TANG-09 Mudes OS936K™ and** Peter 
| SJartOi StVDOS™ . SKDOS is a single user, siogfe tasteng 
| system that takes up where *R£X~ left off. SKDQS is 
| actualy a efiXXX FLEX type system (At* a 7SC product; 



C OnnpQe time OS« 68K. Hart Diak^ 
MJ5TANQ4B 8 Ms CPU Ofrfn 32«K 

Other poeuhr B009 tytam 1 nil <- 05 sac 

MUSTANM20 Omtn-Zlsae 



J? 




cw 


MC6800B 


RAM 


768K 




NoWstSaaa 


PORTS 


4-RS232 




2-8blParaU 


CLOCK 


MK48T02 


EPR0M 


16K33(arB4K 


aoppv 


W01772 


WFO DSK 


M^fee Rwt 



12 Mhz 
2S6K Chfce 

UC6SB1 QUART 
MCS21 P1A 

FfeeJ Tims Ob* Bst BAJ 

StMDmw 
WDHXB Bead 



| System Includes OS-9 68K or SK-DOS - Your Choice 



Sperifieations 

I 
I 
I 
I 

I 
I 
I 
I 

}lf Now more serial ports - faster CPU ' 
Battery B/U - and $850.00 OS^9 Profes- 1 
,. slonal with C compiler included! 



*$400.00 



J 



See Musfang-02 Ad • page 5 
for trade-in delate 




MUSTANG-08 



LOOK 



Ssinls 



cs-9 em.. 

QS-9 68K. 



32 ha Reiner 

.18.0... 9.0 
. .9. 8... 6. 3 



r hi l; v 
raglatar long I; 

for (bO; I < 090999; «-ff); 



a 25 Megabyte 
4^ Hard Disk System 

$2,398.90 

Complete with PROFESSIONAL OS-9 

includes the $500.00 C compiler, PC 

style cabinet, heavy duty power supply, 

5' DDDS 60 track floppy, 25 MegByte 

•^ Hard Disk - Ready to Run j 

UnSte other 68006 systems there are several significant 
dKarorcBS. The MUSTANG-08 is a M 12 Megahertz system. The 
RAM uses NO wait stales, this means fid bora MUSTANG type 
performance. 

Abo, albwrg tor addressable HDMPROM the RAM is the 
maximum slowed tor a 68008. The 68008 can only address a 
total of 1 Megabytes of RAM The design afbws al the RAM 
apace (tor al practO purrmrf) to be utilized. What Is ret 
avalabte to the user is requhaJ and reserved for the system 

A RAM daK of 480K can be aaaiy corfgurad. tea*? 288K 
free for crograrrvsyaterr. RAM apace. The RAM OtSK can be 
configured to any son your application raqurea (system must 
have 128K in addition to Is other retirements) Leaving the 
lemaMer of the ongina* 768K tor pmgram use. Sutraer* 
source included (oVtvere, etc.) 



kotTSC 



MUSTANOMbta 



r 



Data-Comp Division 




A Oecade of Quality Service"^ 

7 X^ p/ Systems World Wkfe 

Computer Publishing, Inc. 5900 Cassarda Sfttfi Road 
Telephone 615 842-4601 • Telex 510 60O&3D rfasori Tn 37343 



^ 



Trxae *tih SWTC r*<ten*ry RfX 5' - OJ for %^dd No. 



